读书人

!怎样使得frame的背景变透明?vb6.0中

发布时间: 2012-01-29 21:39:32 作者: rapoo

求助!怎样使得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

读书人网 >VB

热点推荐