비주얼베이직,visual basic,vb .net강좌-스톱워치,stopwatch,Resources,Audio,Timer

WindowsApplication58.exe

실행파일과 사운드를 파일첨부해두었습니다..

타이머 0과 동시에 사운드가 울립니다,.

위와 같이 컨트롤을 배치합니다.

위와 같은 순서대로 사운드를 리소스 등록합니다.

Public Class Form1

    Dim t As Integer

    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click

        t = TextBox1.Text

        Timer1.Start()

    End Sub

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

        t = t - 1

        TextBox1.Text = t

        If t <= 0 Then ' 타이머가 0 이 되면 타이머스톱과 사운드 실행

            Timer1.Stop()

            My.Computer.Audio.Play(My.Resources.squeaky, AudioPlayMode.WaitToComplete)

        End If

    End Sub

End Class