Visual Basic - Cómo parar d reproducir un sonido?

Sé reproducir un sonido con el siguiente código:

Private Declare Function mciExecute Lib \\\"winmm.dll\\\" (ByVal lpstrCommand As String) As Long

Private Sub Form_Load()
Dim iResult As Integer
iResult = mciExecute(\\\"Play c:\\\\windows\\\\alarm.wav\\\")
End Sub

Pero si por ejemplo hay un sonido emitiendose, me da error xk los dispositivos están ocupados. Por eso me gustaría saber, ¿Comó podría parar de reproducir el sonido (en caso de haberlo) para ejecutar el que yo quiera?

Gracias por las soluciones que podaís aportar.

Pido perdón, el código es el siguiente:

Private Declare Function mciExecute Lib "winmm.dll" (ByVal lpstrCommand As String) As Long

Private Sub Form_Load()
Dim iResult As Integer
iResult = mciExecute("Play c:\windows\alarm.wav")
End Sub

Sigo esperando respuesta a la pregunta de ¿Comó podría parar de reproducir el sonido (en caso de haberlo) para ejecutar el que yo quiera?

Gracias de antemano.

La forma mas adecuada para reproducir un sonido es utilizando el microsoft multimedia control 6.0 (mci32.ocx)
una vez que agregues el control, prueba con este ejemplo:

'Reproducir sonido

Private Sub cmdplaysound_Click()
MMControl1.Notify = False
MMControl1.Wait = True
MMControl1.Shareable = False
MMControl1.DeviceType = "waveaudio"
MMControl1.FileName = "ruta de acceso al archivo"
MMControl1.Command = "open"
MMControl1.Command = "play"
End Sub

'Detener ejecucion

Private Sub cmdstopsound_Click()
MMControl1.Command = "stop"
End Sub

dependiendo de cómo quieras manejar la reproduccion de
sonidos, va a ser la forma en que uses los comandos
espero que te sirva
un saludo