求助!怎样使得frame的背景变透明?vb6.0中
我想在vb6.0中把frame框的背景变透明,属性里似乎没有,请问代码怎么写?
谢谢
[解决办法]
总觉得用这个也可行的,不过就是没试出来.
Private Declare Function SetWindowLong Lib "user32" Alias "SetWindowLongA" (ByVal hwnd As Long, ByVal nIndex As Long, ByVal dwNewLong As Long) As Long
Private Const GWL_STYLE = (-16)
sub a
Dim oldSytle As Long
'oldSytle = GetWindowLong(hWnd, GWL_STYLE)
SetWindowLong hWnd, GWL_STYLE, _
GetWindowLong(hWnd, GWL_STYLE) _
Or WS_BORDER Or WS_EX_TRANSPARENT Or WS_EX_STATICEDGE
end sub