MessageBoxのタイマーについて

質問

初めて質問させて頂きます。

タイマーを使ってMsgBoxにメッセージを表示し、
MsgBox　に表示されるOKボタンを押したら、同MsgBox表示のタイマーを止めたい場合、
どのようなスクリプトを書けばよいのでしょうか？

まだ勉強中の身でありますため、初歩的な質問で恐れ入りますが、
ご教示頂けますようお願いいたします。
使用しているソフトは、VB 2010 Expressです。

回答No.1

imogasi · ベストアンサー

Ｇｏｏｇｌｅででも
「VB2010 タイマー」で照会しましたか。
http://itnandemolab.blog70.fc2.com/blog-entry-1899.html
など
ーー
上記例を借りて
フォームにタイマーとボタンを設けた場合（私の場合Button4でしたが普通はButton1)
5秒ごと５回メッセージを表示して止まる例
Private Sub Button4_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button4.Click
Timer1.Interval = 5000 '５秒
Timer1.Enabled = True
End Sub
Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
Static k
MsgBox("定期的なメッセージです。")
k = k + 1
If k > 5 Then
Timer1.Enabled = False
MsgBox("終わります")
End If
End Sub
を多少修正してみてください。
ーーーーーーーー
＞どのようなスクリプトを書けばよいのでしょうか
ＶＢ.ＮＥＴの場合「スクリプト」といわないと思う。
ＶＢＳcriptでコードを書く場合や、ＶＢＡなどではスクリプトという場合があるが（そのほかにも色々在る）、ＶＢ．ＮＥＴでは、コードとかプログラム（コード）などというのではないかな。
Ｇｏｏｇｌｅででも「Ｓｃｒｉｐｔ」で照会して勉強して。

お礼

ご回答をありがとうございます。
ボタンを使わずにタイマーを使いたかったので、うまく調べられませんでした。
If Thenを用いればよかったのですね。

＞ＶＢ．ＮＥＴでは、コードとかプログラム（コード）などというのではないかな。
ご指摘ありがとうございます。
これからもっと勉強します。