VBプログラマ質問スレ(6.0以前) Part35
■ このスレッドは過去ログ倉庫に格納されています
0169デフォルトの名無しさん
NGNGFunction IsLoaded(FormName As String) As Boolean
Dim Form As Form
For Each Form In Forms
If Form.Name = FormName Then
IsLoaded = True
Exit Function
End If
Next
IsLoaded = False
End Function
■ このスレッドは過去ログ倉庫に格納されています