Cómo agregar música de fondo a la programación de teléfonos móviles

Función de declaración privada mciSendString Lib "winmm.dll" alias "mciSendStringA" (ByVal lpstrCommand es String, ByVal lpstrReturnString es String, ByVal uReturnLength es Long, ByVal hwndCallback es Long) es Long

Private subform_Load ()

Atenuar mName como cadena

mName = App. Caminos y caminos. " \test.mid "

return val = mciSendString(" PLAY " & amp; App. Ruta y ruta. "\test.mid", 0 & amp, 0, 0 & amp) 'Música de fondo

Aplicación Shell. Caminos y caminos. "\test.exe", vbNormalFocus 'Programa de llamada.

Conector final