3)添加 I Microsoft multimedia Control,如图所示 图Form1 口x 國四口口口 打开 4)添加 Button1的cick事件过程 Private Sub btnopen_ Click(By Val sender As System Object By Val e As System. EventArgs) Handles btnopen Click OpenFileDialog1 Filter="video(. avi. avi Open FileDialog 1 Show Dialogo filename =Open FileDialog 1. FileName If(Not filename. Equals())Then AXMMControl 1 FileName filename AXMMControl1. Command ="open End If End Subs
（3）添加Microsoft multimedia Control，如图所示。 （4）添加Button1的Click事件过程。 Private Sub btnopen_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnopen.Click OpenFileDialog1.Filter = "video(*.avi)|*.avi" OpenFileDialog1.ShowDialog() filename = OpenFileDialog1.FileName If (Not filename.Equals("")) Then AxMMControl1.FileName = filename AxMMControl1.Command = "open" End If End Sub
7.1.2使用 Windows媒体播放器控件播放音频 在Vsua| Basic net中可以引用 Windows Media Player组件, 制作一个如图所示的多媒体播放程序 wind nm““m|日|一上 具体操作是这样的: (1)新建 Windows应用程序后,创建Form窗体 进行相关参数设置
7.1.2 使用Windows媒体播放器控件播放音频 在Visual Basic .NET中可以引用Windows Media Player 组件， 制作一个如图所示的多媒体播放程序。 具体操作是这样的： （1）新建Windows应用程序后，创建Form1窗体。 进行相关参数设置