主题：mciSendString play后面不能加变量啊，高手指点啊
a6208611
[专家分：0] 发布于 2012-08-28 20:27:00
Private Sub Command2_Click()
Dim mName As String
mName = "E:\BEYOND.mp3"
mciSendString "open mName Alias mp3", 0&, 0, 0
mciSendString "play mp3", 0&, 0, 0
End Sub
为什么这样没声音啊
回复列表 （共6个回复）
沙发
曙光软件 [专家分：0] 发布于 2012-08-28 21:34:00
[size=4]
mciSendString "open[color=FF0000] mName [/color]Alias mp3", 0&, 0, 0
mciSendString "play mp3", 0&, 0, 0[/size]
[size=4]
mciSendString "open " & str(mName) & " Alias mp3", 0&, 0, 0
mciSendString "play mp3", 0&, 0, 0[/size]
板凳
曙光软件 [专家分：0] 发布于 2012-08-28 22:03:00
我发你 邮箱吧 ，邮箱地址发布一下。
3 楼
曙光软件 [专家分：0] 发布于 2012-08-28 22:10:00
已发送，请查收
4 楼
liuyh [专家分：310] 发布于 2012-10-29 12:57:00
楼主应该毫不手软的结贴，慷慨激昂的给分
5 楼
老大徒伤悲 [专家分：29120] 发布于 2012-10-29 13:32:00
楼主提问完了，有没有回来看看都是问题。也许他已经忘记了都在那些网站发过问题呢
6 楼
曙光软件 [专家分：0] 发布于 2012-10-30 23:37:00
支持。。。。。。。。。。[em65]
我来回复
您所在位置：