求助用Wmediaplay插件做MP3播放器

Question

Private Sub Command1_Click()Private Sub Command1_Click()
If Command1.Caption = "暂停" Then
Command1.Caption = "继续"
a1.pause
ElseIf Command1.Caption = "继续" Then
Command1.Caption = "暂停"
a1.runEnd If
End Sub暂停按钮总是不行 怎么改 我插件改名字了 改成了A1停止也不行Private Sub Command2_Click()
a1.stop我是安一个视频做的 他用amove插件 那个插件我的机器读不出 就用MEDIA PLAYER 替换了下菜鸟求助

Answer 1

http://zhidao.baidu.com/question/218848129.html