加茂屋株式会社 - ソフトウェアー - Tips


二重起動を防止する。


Private Sub Form_Load()

Dim MSG As Long

If App.PrevInstance Then

MSG = MsgBox("既に起動されています。", vbCritical)

Unload Me

End

End If

End Sub

Tipsへ


お問い合わせは、こちら

加茂屋株式会社 (C) Kamoya Corporation