Forms |
3.17 Controllare se una maschera è aperta. |
AntoGal |
Public Function FormIsOpen(FormName As String) As Boolean 'Autore: AntoGal 'Accetta: FormName = nome della maschera 'Restituisce: true se la maschera è aperta FormIsOpen = (SysCmd(acSysCmdGetObjectState, acForm, FormName) And _ acObjStateOpen) <> False End Function |