🚀 go-pugleaf

Suzukinです。

M.T. wrote in message <6f73hn$i7u$1@hqgw.hq.mhi.co.jp>...
>VB4.0を使用しています。
>VBで作ったEXEファイルの二重起動
>を認めないためにはどうしたらよいでしょうか？
>API関数を使えば良いと思うのですが、わかりません。
>
>Ｍ．Ｔ．
>

特にAPIを使用しなくても、二重起動はチェックできますよ。
VBのAppオブジェクトを利用します。
このAppオブジェクトには、PrevInstanceというプロパティがあります。
PrevInstanceは、アプリケーションのインスタンスが、
既に実行されているかどうかを示す値を返します。
対象のEXEがすでに起動されている場合は、
PrevInstanceの値がTrueになります。
「二重起動禁止」の具体的例は、以下の通りです。

If App.PrevInstance = True Then
    End
End If

一般的には、Form_Loadイベント等でこの処理を記述します。

以上

M.T. wrote:

> VB4.0を使用しています。
> VBで作ったEXEファイルの二重起動
> を認めないためにはどうしたらよいでしょうか？
> API関数を使えば良いと思うのですが、わかりません。
>
> Ｍ．Ｔ．

こんにちは
大庭です。

色々あると思いますが、簡単な方法だと
スタートアップフォームのロードイベントで

　　　 If App.PrevInstance = -1 Then
　　　　　　　 MsgBox "既にに起動されています。"
　　　　　　　 End
　　　 End If

とすれば出来るはずです。