すでに起動されているアプリケーションを２重に起動できないように設定します　　（０２８）
	使用例 　　ロードイベントに次の内容を記入する Private Sub Form_Load()     'アプリケーションのインスタンスが既に実行されているか     'どうかを示す値を返します。     If App.PrevInstance = True Then     'True の場合すでに起動中         Unload Me     End If End Sub

01/12/31