第十五课: 设计多媒体应用程序-第一部分

对不起,正在翻译中。欢迎下次再浏览。 

You can create various multimedia applications in VB that could play audio CD, audiofiles, VCD , video files and etc.
To be able to play multimedia files or multimedia devices, you have to insert Microsoft Multimedia Control into your VB applications
that you are going to create. However, Microsoft Multimedia Control is not normally included in the startup toolbox, therefore you need
to add the MM control by pressing Ctrl+T and select it from the components dialog box that is displayed.

15.1 Creating a CD player

(a) The Interface.
 
 
 
 

Private Sub Form_Load()
'To position the page at the center
Left = (Screen.Width - Width) \ 2
Top = (Screen.Height - Height) \ 2
'Open the CD
myCD.Command = "Open"

End Sub
Private Sub myCD_StatusUpdate()
'Update the track number
trackNum.Caption = myCD.Track
End Sub

Private Sub Next_Click()
myCD.Command = "Next"
End Sub

Private Sub Play_Click()
myCD.Command = "Play"

End Sub

Private Sub Previous_Click()
myCD.Command = "Prev"
End Sub

Private Sub Stop_Click()
myCD.Command = "Stop"
End Sub
Private Sub Exit_Click()
End
End Sub
 

[Back to Content Page]