vb透明控件

Public Declare Function SetWindowRgn Lib "user32 " (ByVal hwnd As Long,ByVal hRgn As Long,ByVal bRedraw As Boolean) As Long
Public Declare Function CreateRectRgn Lib "gdi32" (ByVal X1 As Long,ByVal Y1 As Long,ByVal X2 As Long,ByVal Y2 As Long) As Long
主要用以上2个函数，可以做到窗体上全部控件透明或指定控件透明

也可以做到任意形状的透明。

具体需要进行深度处理开发才能让任意控件透明，有需要的可以找我

原图如下：