Unload form in Form_Load()

Hi,
I have two forms:
- frmMain
- frmPreview

I call frmPreview from frmMain using

Code:

---

' 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

Code:

---

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

---

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

Code:

---

'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.

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