mciSendString的奇怪现象
我用mciSendString函数播放一段MP3音乐,在本机上能够正常播放,但放到别的电脑上却不能播放出声音,百思不得其解,望大神帮忙查找问题在哪里。我设置了返回值,在本机和别的电脑上返回值R都不等于0.
--------------------编程问答-------------------- 音乐路径不对呗 --------------------编程问答-------------------- 原来路径不能有空格,在路径前后加上双引号即可。
Dim MusicPath As String
Dim R As Long
Call mciSendString("close MyMusic", 0, 0, 0)
MusicPath = "open " & Form1.SoundTextBox.Text & " alias MyMusic"
R = mciSendString(MusicPath, 0, 0, vbNull)
Form1.Label2.Text = R
R = mciSendString("play MyMusic repeat", 0, 0, 0)
Form1.Label2.Text = Form1.Label2.Text & "," & R
补充:.NET技术 , VB.NET