Buenas tardes
Tengo esto


Private Sub Command1_Click()
If List1.ListIndex = 0 Then
Dim RetVal
MMC.Command = "Pause"
RetVal = Shell("k:\cat.EXE", 1)
End If

Q es lo q pasa? q cuando abro el archivo cat.exe, el sonido se para, pero
cuando vuelvo al formulario, ya no suena. Q debo hacer? me pueden ayudar?