Private Sub Form_Unload(cancel as Integer)
     frmMain.mnuInfoForm.Checked = False
End Sub

When executing I get a run time error 426.  The error message says "Only one
MDI Form allowed".  I've tried using "MDIForm.mnuInfoForm.Checked = False"
and I get the object required error.  Any body know what I'm doing wrong?  I
know I've done this before in VB4, I just can't find any examples of it at
home, and I no longer work where I did it.

Tim Crockett
Paisley Rainbow Studios

So, if you have a menu named 'mnuTest', with an option 'opcForm1' in an MDI
parent form named 'frmMain', you can place a check mark next to the
'opcForm1' option by using:

    Private Sub opcform1_Click()
            Form1.Show
            frmMain.opcform1.Checked = True
    End Sub

where Form1 is an MDI child form.

to remove the check mark, you can use:

    Private Sub Form_Unload(Cancel As Integer)
        frmMain.opcform1.Checked = False
    End Sub

in the MDI child form.

I've tested this solution briefly and it seems to work

vmlf.

In a Module:
Public fMainForm As frmMain

Sub Main()
    Set fMainForm = New frmMain
    fMainForm.Show
End Sub

Now, you MUST always reference the MDI Parent by fMainForm. If you try to
call it by its name (frmMain in your example), VB thinks you want to load
another instance, which is not allowed for MDI Parent forms. Change the
frmMain in the Form_Unload to the variable fMainForm, and you'll be OK.

Jonas
TRION Technologies