| 'DECLARATIONS: (Add To Module) Declare Function SetWindowLong Lib "user32" _ Alias "SetWindowLongA" _ (ByVal hwnd As Long, _ ByVal nIndex As Long, _ ByVal dwNewLong As Long) _ As Long Const WS_EX_TRANSPARENT = &H20& Const GWL_EXSTYLE = (-20) 'EXECUTION: Dim Ret As Long Ret = SetWindowLong(frmMain.hwnd, GWL_EXSTYLE, WS_EX_TRANSPARENT) Form1.Show |
Transparent Form |
Express News India | Freelance ecommerce web development India