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 () p>
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