１か月前からVBの勉強を始めたものです。
下記のように、カウントダウンタイマーを作成したいですが
やり方がわからないです。
１ From構成：
textBox1(時刻指定用),label1(カウントダウン表示用)、Button1(スタート用)
2 使用：
textBox1に "**:**"形で指定したい時間と分を入力して、Button1を押したら、label1内に今の時刻からのカウントダウンタイマーを表示される
3 カウントダウンが0になったら、何とかの形で知らせてくれる。
msgboxでもかまいません。
ネットでも調べましたが、自分のニーズに合わせるものを見つかりませんでした。~@~
どうぞ、よろしくお願い致します。
投稿日時 - 2009-04-29 00:23:36
Dim dTime As DateTime
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
dTime = TextBox1.Text
Timer1.Interval = 1000
Timer1.Enabled = True
End Sub
Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
dTime = dTime.AddSeconds(-1)
TextBox2.Text = dTime
If dTime = "0:0:0" Then
Timer1.Enabled = False
MessageBox.Show("終了")
End If
End Sub
こんなんでどうでしょうか？
投稿日時 - 2009-04-29 02:18:50
補足
早速にご回答頂き、ありがとう御座いました。
教えた通り、簡単かつスムーズにプログラムができましたので
勉強にもなりました。(^@^)
まだ、次の質問があったので、宜しければ、教えて頂きたいです。
１ 入力した内容は 時間じゃない or 書式が正しくない場合は
何もしないでのチェック機能を追加したい
例1： 789:52 例2： 田中:６７
２ 日付と時刻を同時に入力しても、カウントダウンできるような
機能に追加したい
入力例： 2009/05/03 15:00
いきなり、質問を追加しましたので、とても失礼しましたが
ぜひ、宜しくお願いします。
投稿日時 - 2009-04-29 14:57:40
2人が「このQ&Aが役に立った」と投票しています
ベストアンサー以外の回答（1件中 1～1件目)
OKWaveのオススメ
おすすめリンク
