Results 1 to 7 of 7

Thread: How many test form is open?

Hybrid View

  1. Aug 11th, 2013, 02:37 AM #1
    Bonnie West
    Bonnie West is offline
    Default Member Bonnie West's Avatar
    Join Date
    Jun 2012
    Location
    InIDE
    Posts
    4,060

    Re: How many test form is open?

    The Unload statement expects an Object (a Form or a Control), not a String. Try this instead:

    Code:
    Private Sub mnuCloseAllMDIChildForms_Click()
    Do Until Me.ActiveForm Is Nothing
        Unload Me.ActiveForm
    Loop
End Sub
    Last edited by Bonnie West; Aug 15th, 2013 at 04:25 AM.
    On Local Error Resume Next: If Not Empty Is Nothing Then Do While Null: ReDim i(True To False) As Currency: Loop: Else Debug.Assert CCur(CLng(CInt(CBool(False Imp True Xor False Eqv True)))): Stop: On Local Error GoTo 0
    Declare Sub CrashVB Lib "msvbvm60" (Optional DontPassMe As Any)
    Reply With Quote Reply With Quote
  2. Aug 15th, 2013, 02:55 AM #2
    dong
    dong is offline

    Thread Starter
    Fanatic Member
    Join Date
    Mar 2008
    Posts
    522

    Re: How many test form is open?

    Ok, thank you very much
    Reply With Quote Reply With Quote
« Previous Thread | Next Thread »

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •  

Forum Rules


Click Here to Expand Forum to Full Width