我用VB新建了个项目,新建了个BAS模块文件,输入一下内容:
Public Declare Function PlaySound Lib "winmm.dll" Alias "PlaySoundA" (ByVallpszName As String, ByValhModule As Long, ByValdwFlags As Long) As Long
Public Const SND_FILENAME = &H20000
Public Const SND_ASYNC = &H1然后新建一个函数,执行下面那个句子
PlaySound "E:\My Programs\Chamberlain\123.wav", 1, 1成功!电脑能正确播放出该wave文件。但是我把上面的语句照搬到自己现有的一个项目里面,发现居然不能发生,PlaySound返回的是0,为什么?是否跟什么冲突了?求助!
Public Declare Function PlaySound Lib "winmm.dll" Alias "PlaySoundA" (ByVallpszName As String, ByValhModule As Long, ByValdwFlags As Long) As Long
Public Const SND_FILENAME = &H20000
Public Const SND_ASYNC = &H1然后新建一个函数,执行下面那个句子
PlaySound "E:\My Programs\Chamberlain\123.wav", 1, 1成功!电脑能正确播放出该wave文件。但是我把上面的语句照搬到自己现有的一个项目里面,发现居然不能发生,PlaySound返回的是0,为什么?是否跟什么冲突了?求助!
解决方案 »
- 谁能举个例子说明一下事件驱动和非事件驱动的区别
- 求获取网上天气预报的代码?
- 就8行代码,请看一下,关键是可以set nothing却不能close,为什么?
- 如何向指定程序发送键盘消息?
- 安装软件的时候总有由蓝到黑渐变的背景,是如何实现的?
- 在FORM中已经定义了一排TextBox,name设为txt1,txt2,txt3....在代码如何用循环得到它们的值?
- 如何使datagrid里修改的数据在数据库里也更新?
- 关于Form_Load中访问控件Visible属性的问题!
- MSFlexGrid控件显示数据问题
- 如何使窗体大小不能改变?
- 如何在自己开发的控件中如何加载滚动条??
- 如何添加Transfer控件和WebBrowser控件
Const SND_ASYNC = 1
Const SND_FILENAME = &H20000PlaySound wav文件路径, CLng(0), SND_ASYNC Or SND_FILENAME