(*´д`*)アハァ… VB初心者質問スレ Part14
■ このスレッドは過去ログ倉庫に格納されています
0019デフォルトの名無しさん
NGNGPrivate Sub Form_Load()
'二重起動チェック
If App.PrevInstance Then
Call MsgBox("このシステムはすでに起動しています。", vbCritical, "エラー")
Unload Me
End If
・・・通常時処理・・・
End Sub
EXEを作って二重起動してみると、思惑通りエラーが出て、
勝手に閉じるまでは良いものの、フォームは見えないのにジョブは終了していなくて、
Ctrl+Alt+Delで終了させています。
通常なら「Unload Me」で閉じるのですが、何がダメなんでしょうか。
■ このスレッドは過去ログ倉庫に格納されています