我想用VB制作一个程序（见详细说明）

程序大概是这样的。主题是倒计时器，我想在倒计时结束时自动播放一个WAV格式的文件，其他部分都已经完成，只剩下自动播放部分了，请高手指教。
以下是我的源代码：
Dim a As Integer

Private Sub Command1_Click()
a = Val(Text1.Text)
Timer1.Enabled = True
Text1.Enabled = False
Text1.BackColor = &H8000000A
Command2.Enabled = True
Command1.Enabled = False
End Sub

Private Sub Command2_Click()
a = 0
Command1.Enabled = True
Timer1.Enabled = False
Text1.Enabled = True
Text1.BackColor = &H80000009
End Sub

Private Sub Command3_Click()
End

End Sub

Private Sub Label3_Change()
Label3.Caption = Format(a, "00000000")
If a <= 0 Then
MsgBox "时间到！", vbOKOnly, 时间到
Timer1.Enabled = False
End If
End Sub

Private Sub Timer1_Timer()
a = a - 1
Label3.Caption = a
End Sub

VB制作一个程序 关于用vb制作一个小程序 关于VB的一个程序制作 vb制作一个定时关机程序 急求一个VB制作程序 如何用VB制作一个保护程序 用VB制作QQ登陆，详细如下： 我想用VB或C编一个游戏程序 我想用VB写一个这样的程序 用VB制作一个加法器