P.T.A.M.
Administrator
Joined: 08 Oct 2003
Posts: 752
Location: Greece
|
 Posted: Oct 10th, 2003 08:05 AM Post subject: Unload a form in the form load event |
 |
|
| Code: | Option Explicit
Private Declare Function PostMessage Lib "user32" Alias "PostMessageA" (ByVal hwnd As Long, ByVal wMsg As Long, ByVal wParam As Long, ByVal lParam As Long) As Long
Private Const WM_CLOSE = &H10
Private Sub Form_Load()
PostMessage Me.hwnd, WM_CLOSE, 0, 0
End Sub |
_________________
No one is completely useless. They can at least be an example of what to avoid. |
|
