nudMinuteNum.Valueコントロールについて
nudMinuteNum.Valueコントロールについて
nudMinuteNum.ValueコントロールとnudSecondNum.Valueコントロールについて
下記のような簡単なプログラムなのですが、
(http://www.microsoft.com/Japan/msdn/archive/student/challenge/chap4_vb/default.aspx
のラーメンタイマーのプログラム)
「nudMinuteNum は分を入力する数値アップダウン コントロールの名前で~」
とありますが、nudMinuteNumコントロールをMSDNとかで調べても見つかりません。
どなたかすみませんが、どういうことかおおしえねがえませんでしょうか?
Public Class Form1
Private SecCount As Integer ' 秒数をカウントする変数
Private WaitSecond As Integer ' タイマー停止時間を秒単位で記憶する変数
Private Sub btnStart_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnStart.Click
' 指定されたタイマー停止時間を秒単位で記憶
WaitSecond = nudMinuteNum.Value * 60 + nudSecondNum.Value
' 指定されたタイマー停止時間が 0 秒のときは開始処理をキャンセル
If WaitSecond = 0 Then
Exit Sub
End If
' 秒数のカウントと表示を 0 に初期化
SecCount = 0
DigitalTimer.Second = 0
' 指定されたタイマー停止時間を秒単位にしてプロパティに設定
'Timer1.Interval = (nudMinuteNum.Value * 60 + nudSecondNum.Value) * 1000
' 表示画像を変更
PictureBox1.Image = My.Resources.Resources.調理中
' [START] ボタンを無効化
btnStart.Enabled = False
' タイマーを開始
Timer1.Start()
End Sub
Private Sub DigitalTimer_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles DigitalTimer.Load
End Sub
Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
SecCount = SecCount + 1
DigitalTimer.Second = SecCount
If SecCount = WaitSecond Then
' 表示画像を変更
PictureBox1.Image = My.Resources.Resources.完成
' タイマーを停止
Timer1.Stop()
' [START] ボタンを有効化
btnStart.Enabled = True
End If
End Sub
End Class