Visual Basic - codigo

nececito codigo para que el form entre con sonidos, ya use:
Declare Function mciExecute Lib "winmm.dll" (ByVal lpstrCommand As String) As Long

pero no me sale.. porfavor

Para eso no necesitas ninguna API ni librerías externas, el propio VB trae el control MMControl (Multimedia MCI).

Busca en componentes "Microsoft Multimedia Control", pega uno en el formulario (si quieres con la propiedad visible a False) y le pones este código

Private Sub Form_Load()
With MMControl1
.FileName = "c:\MiSonido.mid" <-- ruta y nombre del archivo (con extensión)
.Command = "Open"
.Command = "Play"
End With
End Sub

Este control puede reproducir archivos tipo mp3, mid, wav... e incluso archivos de video avi, mpg, wmv....

gracias, ahora voy a probarlo, gracias

me sirvio de mucho el codigo, por fin, corre un sonido al cargar un form,

no es que quiera abusar, pero,..sabras como controlar el volumen?, tengo otro formulario enfocado a los niños, y ahi ya puse codigo para play, stop, pausa, pero no controlo volumenes, me podrias ayudar,
de anexo...
gracias, espero que me eyude alguien,..porfavor..gracias

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

dim rep

Private Sub Command1_Click()
' ESTO REPRODUCE SONIDOS MP3
Rep = mciExecute("Play d:Sonido.mp3")
End Sub

Private Sub Command2_Click()
' esta linea lo para
Rep = mciExecute("stop d:sonido.mp3")
end sub
AHORA LO QUE TIENES QUE HACER ES POR EJEMPLO PONER UN SONIDO MP3 UNA CANCION O LO QUE QUIERAS EN EL DISCO D Y LE CAMBIAS EL NOMBRE A "SONIDO"
Y YO CREO QUE FUNCIONARA SI QUIERES REPRODUCIR OTRO SONIDO POR EJEMPLO WAV TIENES QUE VARIAR EN VEZ DE D:SONIDO.MP3 ___- A D:SONIDO.WAV