您可以在VB中创建各种多媒体应用程序，音频文件播放器，光碟播放器，视频文件播放器等。为了建立能够播放多媒体文件或多媒体设备的VB程序，你必须把Microsoft多媒体控制插入到您的VB应用程序 中。不过，微软的多媒体控制是通常不包括在启动工具箱，因此，您需要把MMControl（多媒体控件）加入到工具箱中。您可按下CTRL +T，并从对话框显示的组件中选择 Microsoft Multimedia Control 6.0, 之后多媒体控件就会出现在工具箱中�
'把播放器定位在屏幕中�
Left = (Screen.Width - Width) \ 2
Top = (Screen.Height - Height) \ 2
'启动CD
myCD.Command = "Open"
End Sub
Private Sub myCD_StatusUpdate()
'更新光碟音轨号码
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
