凤凰台小说向本贵:vb 高手请来

来源：百度文库编辑：神马品牌网时间：2024/04/30 01:14:13

大家好!我现在是初学,想做一个MP3播放器
可是做完以后就出现了如下问题:"

Private Sub mnuFile_Click()
Dim filename As String
CommonDialog1.Filter = "Mp3歌曲|*.Mp3|wav音效(*.wav)|*.wav|avi影片(*.avi)|*.avi|midi音乐(*.midi)|*.midi"
Call openfile
End Sub
Private Sub openfile()
Dim filename As String
CommonDialog1.ShowOpen
filename = CommonDialog1.filename
Label1.Caption = filename
If filename <> "" Then
MMControl1.Command = "Stop"
MMControl1.Command = "close"
MMControl1.filename = filename
MMControl1.Command = "Open"
End If
End Sub"
这段代码中提示我"MMControl1.Command = "Stop""有错误

生成的exe文件的时候提示我未找到成员或者数据类型
该怎么办?

vb 高手请来高手请来$$我有一道vb problem未解决?? 高手请来高手请来高手请来???????? 高手请来！！！！高手请来~~ 高手请来高手请来高手请来