by Said Sowiny (2 Submissions)
Category: Custom Controls/Forms/Menus
Compatability: Visual Basic 5.0
Difficulty: Advanced
Date Added: Wed 3rd February 2021
Rating: (6 Votes)
This Function checks if a specified Form is loaded
by looping through the forms collection
it returns TRUE if it is and FALSE if it is not
you can decide what you want according to the
return value e.g accessing its properties or methods or controls ,...
Public Function IsLoaded(ByVal strForm As String)As Boolean
Dim frmloaded As Form
IsLoaded = False
If strForm = "" Then Exit Function
For Each frmloaded In Forms
If frmloaded.Name = strForm Then
IsLoaded = True
Exit Function
End If
Next
End Function