Is form opened?

  • Thread starter Thread starter MichaelK
  • Start date Start date
M

MichaelK

What is the easiest way to find out if specific form is open.

Thanks,
Michael
 
What is the easiest way to find out if specific form is open.

Thanks,
Michael
Click to expand...

What version of Access?
Access 2002:
If Not CurrentProject.AllForms("FormA").IsLoaded Then
Do something here
Else
Do something else
End If

In Access 97, copy this function (from the Northwind.mdb sample
database), and paste it into a public module.

Function IsLoaded(ByVal strFormName As String) As Integer
' Returns True if the specified form is open in Form view or
Datasheet
view.

Const conObjStateClosed = 0
Const conDesignView = 0

If SysCmd(acSysCmdGetObjectState, acForm, strFormName) <>
conObjStateClosed Then
If Forms(strFormName).CurrentView <> conDesignView Then
IsLoaded = True
End If
End If
End Function

Then code:
If Not IsLoaded("FormA") Then
Do this
Else
Do that
End if
 
You must log in or register to reply here.

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Similar Threads

Copy record in one form into a new pop-up form 0
Form State 2
Enabling TxtField on Checkbox 2
link form to report 1
Creating Checkbox Fields For Every Record 0
open a form if user inputs specific text 2
Access Command to run access, open to specific form and specific record 1
What is the easist way to make a form be blank when first opened? 4

Back
Top