Poner sonido en microsoft visual studio 2005

Option Explicit
Dim DX As New DirectX8
Dim DS As DirectSound8
Dim Sound As DirectSoundSecondaryBuffer8
Dim SoundDesc As DSBUFFERDESC
Private Sub Command1_Click()
Dim Num As Integer
Num = Int(2 - 1) * Rnd() + 0
TextBox1.Text = Num
Dim Num1 As Integer
Num1 = Int(2 - 1) * Rnd() + 0
TextBox2.Text = Num1
Dim Num2 As Integer
Num2 = Int(2 - 1) * Rnd() + 0
TextBox3.Text = Num2
Dim m As Integer
If Num = Num1 And Num1 = Num2 Then
Sound.Play DSBPLAY_DEFAULT
MsgBox ("¡¡Ganaste!!")
End If
End Sub
Private Sub Command2_Click()
Sound.Play DSBPLAY_DEFAULT
End Sub
Private Sub Form_Load()
Inicio
End Sub
Private Sub Form_Unload(Cancel As Integer)
End
End Sub
Sub Inicio()
Set DS = DX.DirectSoundCreate("")
DS.SetCooperativeLevel hWnd, DSSCL_NORMAL
Set Sound = DS.CreateSoundBufferFromFile(App.Path & "\sound.wav", SoundDesc)
End Sub
Copia y pega este codigo y en referencias incluye el "DirecX 8 for Visual Basic"