|
Can you give me the Code for Windows media Control Mixed with Resource ??
Cause Private Sub Form_Load()
MMControl1.FileName = App.Path & "\intro_sound.mp3"
MMControl1.Command = "Open"
MMControl1.Wait = True
MMControl1.Shareable = False
MMControl1.Command = "Play"
MMControl1.Command = "Close"
End Sub
interrupts my program
How should i do it?
|