Visual Basic - sonidos

hola a todos

alguien sabe del manejo de sonidos

lo que necesito es generar distintos sonidos

cuando se produsca un error

esta la funcion beep pero necesito otro distinto
es posible?

si alguien me ayuda porfa

vale vale vale y mas vale

Una manera es utilizar funciones de las APIs.

Con esto declaras en un formulario la función 'sndPlaySound' para reproducir un archivo del tipo WAV:

Private Declare Function sndPlaySound Lib "winmm.dll" Alias "sndPlaySoundA" (ByVal lpszSoundName As String, ByVal uFlags As Long) As Long

Const SND_ASYNC = &H1
Const SND_NODEFAULT = &H2

Y en donde sea necesario la invocas.
sndPlaySound "tu archivo.wav", SND_ASYNC Or SND_NODEFAULT

Una forma original:
Colocas en el form un control DirectSS (En menú Proyecto->Componentes->Controles y marcas "Microsoft Direct Text-to-Speech") con la propiedad visible a False y además un TextBox y pones este código

Private Sub Text1_KeyPress(KeyAscii As Integer)
If Not IsNumeric(Chr(KeyAscii)) Then
DirectSS1.Speak "Sólo se admiten números"
KeyAscii = 0
End If
End Sub

Ejecútalo, y verás (mejor dicho, oirás)