求助用Wmediaplay插件做MP3播放器

Private Sub Command1_Click()

Private Sub Command1_Click()
If Command1.Caption = "暂停" Then
Command1.Caption = "继续"
a1.pause
ElseIf Command1.Caption = "继续" Then
Command1.Caption = "暂停"
a1.run

End If


End Sub

暂停按钮总是不行 怎么改 我插件改名字了 改成了A1

停止也不行

Private Sub Command2_Click()
a1.stop

我是安一个视频做的 他用amove插件 那个插件我的机器读不出 就用MEDIA PLAYER 替换了下

菜鸟求助 --------------------编程问答-------------------- http://zhidao.baidu.com/question/218848129.html

补充：VB ,  多媒体