【6日でできるVisual Basic2022入門】①ラーメンタイマーアプリの概要

[Start クリック]
   ├─ 入力検証（整数かつ >0？）
   │     └─ NG: エラー表示して終了
   ├─ 経過=0、残り=入力値
   ├─ Timer 開始（1秒間隔）
   └─ [Tick ごと]
         ├─ 経過+1、残り=入力-経過
         ├─ 残りを画面表示
         └─ 残り==0 なら
               ├─ Timer 停止
               ├─ 音を鳴らす
               └─ メッセージ表示（完了通知）

Public Class FormRamenTimer
    Private EndSeconds As Integer    ' 入力された合計秒
    Private Elapsed As Integer       ' 経過秒

    Private Sub ButtonStart_Click(sender As Object, e As EventArgs) _
        Handles ButtonStart.Click

        Dim tmp As Integer
        If Not Integer.TryParse(TextSetSeconds.Text, tmp) OrElse tmp <= 0 Then
            MessageBox.Show("ゆで時間は 1 以上の整数で入力してください。", "入力エラー")
            TextSetSeconds.Focus()
            TextSetSeconds.SelectAll()
            Return
        End If

        EndSeconds = tmp
        Elapsed = 0
        TextRemaining.Text = EndSeconds.ToString()

        Timer1.Interval = 1000   ' 1秒
        Timer1.Start()
        ButtonStart.Enabled = False
    End Sub

    Private Sub Timer1_Tick(sender As Object, e As EventArgs) _
        Handles Timer1.Tick

        Elapsed += 1
        Dim remaining = EndSeconds - Elapsed
        If remaining < 0 Then remaining = 0
        TextRemaining.Text = remaining.ToString()

        If remaining = 0 Then
            Timer1.Stop()
            ButtonStart.Enabled = True
            System.Media.SystemSounds.Asterisk.Play()
            MessageBox.Show("麺がゆで上がりました！お好みの固さでどうぞ。", "ラーメンタイマー")
        End If
    End Sub
End Class

[秒数入力: 180] → [Start]
    ↓ カウントダウン表示: 180,179,178,...,3,2,1,0
    ↓ 残り 0
    ↓ 音が鳴る＋「麺がゆで上がりました！」ダイアログ