Download for FREE the ADO/DAO Data Controls that makes life EASIER developing database applications in: VB, FoxPro, Access, VC++, .NET etc... Navigate, Add New, Delete, Update, Search, Undo and Save your changes. Supports Disconnected Recordsets and Transactions!
Or try our Ask An Expert service to answer any of your questions!
Originally posted by matatan
I just wanted to know if someone knows how to check if a form is open from a function. I have a function that needs to do this and I can't get it working!!! And help would be much appreciated....
Function IsLoad(strFormName As String) As Boolean
Const conDiseg = 0
Dim entX As Integer
IsLoad = False
For entX = 0 To Forms.Count - 1
If Forms(entX).FormName = strFormName Then
If Forms(entX).CurrentView <> conDiseg Then
IsLoad = True
This function can help you, return True if the name form il load an False if is not load.