主题:播放问题
请帮忙,先谢谢
如下可以播放:
Private Sub Command1_Click()
Dim temp As Integer
temp = mciExecute("Play c:\windows\media\logoff.wav")
End Sub
下面就不行了,不知道该怎样改?
Private Sub Command1_Click()
Dim temp As Integer
temp = mciExecute("Play app.path+"\media\logoff.wav"")
End Sub
如下可以播放:
Private Sub Command1_Click()
Dim temp As Integer
temp = mciExecute("Play c:\windows\media\logoff.wav")
End Sub
下面就不行了,不知道该怎样改?
Private Sub Command1_Click()
Dim temp As Integer
temp = mciExecute("Play app.path+"\media\logoff.wav"")
End Sub