Unload form in Form_Load()

[Tomexx]

Hi,
I have two forms:
- frmMain
- frmPreview

I call frmPreview from frmMain using

' This button is on frmMain
Private Sub Command1_Click()
  '
  ' some code 
  '
  frmPreview.Show vbModal
  '
  if globalVar = True then
    ' some other code
  endif
  '
End Sub

In the Form_Load() of frmPreview I'd like to be able to stop loading the form, unload it and go back to frmMain and execute the more code.

Can I unload a form from its Form_Load()?

Something like this... that actually works

' This is my frmPreview
Private Sub Form_Load()
  If something then
    globalVar = True
    Unload me
  endif
End Sub

[Hack]

You will get an trappable error indicating the form is already unloaded and it will highlight the .Show statement on the calling form. You can get around that though, by trapping it

'on form1
Private Sub Command1_Click()
On Error GoTo ErrTrap
Form2.Show
Label1.Caption = "Hey there"
Exit Sub
ErrTrap:
If Err.Number = 364 Then 'object was already unloaded
   Resume Next
Else
   MsgBox Err.Number & " " & Err.Description
End If
End Sub

'on Form2
Private Sub Form_Load()
If blnStopLoad = True Then
   blnStopLoad = False
   Unload Me
End If
End Sub

blnStopLoad is a global boolean I created for toggling whether or not to load the form.

[westconn1]

probably better to test the value of something before loading the form, or just set it to visible =false