各位老兄,大哥大姐,本人在写程序的时候,为了去播放WAV文件。播放WAV文件我用的API函数。我想用WindowsMediaPlayer控件,只用上面的播放和停止按钮,还用它带的进度条,还有音量控制!但小弟没用起来。请教!
解决方案 »
- AutoDesk的DwgThumbnail控件不能响应鼠标操作怎么办??
- 失恋,散分,无须多言
- 急急,网络的一个上传下载问题,各位高手帮帮忙?
- 怎样读取和控制Numlock键
- 急,如果向data追加数据啊?
- 急!水晶报表如何导成其他格式?
- 如果让记录集脱立连接?
- 我用ado访问数据库,rs=cn.execute(str) rs.movelast,rs.moveprevious 报错,请问怎样设置rs? 最好给出代码,谢谢
- 为了我的那些被裁员的同志!我一周不再回答问题了。
- 高手请赐教:如何改变5460网站留言簿中文本的字体与颜色??
- 日期输入的实现?
- WindowsMediaPlayer 控件的File name 及Play 的属性怎么没有了 一直在线
Private Sub Form_Load()
CommonDialog1.Filter = "影像文件(*.Avi;*.Mpg;*.Dat;*.Asf)|*.Avi;*.MPG;*.DAT;*.Asf| All files (*.*)| *.*"
End Sub
'打开文件并自动播放
Private Sub open_Click(Index As Integer)
Dim MFile As String
CommonDialog1.ShowOpen
MFile = CommonDialog1.FileName
MediaPlayer1.FileName = MFile
MediaPlayer1.AutoStart = True
MediaPlayer1.AutoSize = True
End Sub
WindowsMediaPlayer1.Controls.Play