问答文章1 问答文章501 问答文章1001 问答文章1501 问答文章2001 问答文章2501 问答文章3001 问答文章3501 问答文章4001 问答文章4501 问答文章5001 问答文章5501 问答文章6001 问答文章6501 问答文章7001 问答文章7501 问答文章8001 问答文章8501 问答文章9001 问答文章9501

用vb怎样实现单击一个按钮触发一个声音文件

发布网友 发布时间:2024-10-17 20:21

我来回答

3个回答

热心网友 时间:2024-10-17 20:58

Public Declare Function PlaySound Lib "winmm.dll" Alias "PlaySoundA" (ByVal lpszName As String, ByVal hModule As Long, ByVal dwFlags As Long) As Long '声明API函数

'声明常量 下面是这个函数的dwFlags参数的常用值
Const SND_SYNC = &H0 '声音同步播放
Const SND_ASYNC = &H1 '声音非同步播放
Const SND_NODEFAULT = &H2 '如果声音文件不存在也不产生错误
Const SND_FILENAME = &H20000 '声音是文件类型
r = PlaySound( "D:\示例.wav", 0&, SND_ASYNC Or AND_FILENAME Or SND_NODEFAULT)

写这么明白 应该了解了吧

热心网友 时间:2024-10-17 20:58

Public Function MediaPlayer(ByVal Controls As WindowsMediaPlayer, ByVal File, Optional Volume = 50, Optional ByVal Visible = 0)
Controls.Visible = Visible
Controls.settings.Volume = Volume
Controls.URL = File
Controls.Controls.play
End Function
'以上放到模块中

添加一个windowsmediaplayer控件
调用MediaPlayer,方法如下
Private Sub Form_Load()
MediaPlayer WindowsMediaPlayer1, "1.mp3", 100, 0 '控件名,文件路径,音量最大100,0隐藏或1显示控件
End Sub

热心网友 时间:2024-10-17 21:05

Private Declare Function PlaySound Lib "winmm.dll" Alias "PlaySoundA" (ByVal lpszName As String, ByVal hModule As Long, ByVal dwFlags As Long) As Long
Private Const SND_ASYNC = &H1 ' play asynchronously

Private Sub Command1_Click()
PlaySound "C:\WINDOWS\Media\ding.wav", 0, SND_ASYNC
End Sub
声明声明:本网页内容为用户发布,旨在传播知识,不代表本网认同其观点,若有侵权等问题请及时与本网联系,我们将在第一时间删除处理。E-MAIL:11247931@qq.com
怀孕甲状腺激素偏高正常吗 怀孕检查甲状腺素偏高是什么原因引起的 怀孕了甲状腺功能偏高是怎么回事 怀孕甲状腺高是什么引起的 孕中期促甲状腺激素偏高是什么原因 重钢别墅靠谱吗 重刚别墅的致命缺点 重钢别墅的优点和缺点各是什么 积食可以吃什么 车子换了点火线圈,分缸线,火花塞以后车子打不着。这是什么原因 ...蛋白53%。如果一个鸡蛋重80克,那么这个鸡蛋中的蛋白重多少克... 为什么phone手机话筒声音特别小? 这是什么青蛙有没有毒? 捡到一台小米手机怎么解锁? 请问在N81上怎么装GBA模拟器? 妈妈的英语单词怎么写的? 请问哪里可以下载到N81用的GBA,GBC模拟器,要有证书可以安装的_百度知 ... 舌骨骨折简介 你认为有哪些适合日常生活中的男生穿衣技巧? QQ空间里以前的照片怎么变小了啊?请问怎么把它变成原来的样子啊? 黄帝陵公祭在每年的什么季节举行 血压测左手准还是右手准 canyouhelpme一般怎么回答 ...小胖平均每分钟走62米,小丁丁平均每分钟走65米,相遇时小丁丁比... 一年级入学拼音准备图书信息 他说他想询问某一个病人的情况用英语怎么说 我要学拼音概述 高中毕业证好还是职校毕业证好 请各位指点一下 谢了 高中毕业证和职校毕业证谁更管用 ? 职业学校毕业证可以在什么工作上用到? 阴道有水泡,小便开头有点疼,娥有霉菌性阴道炎,请问这是怎么回事... 索立信S18豪华版为什么会出现白频,屏幕闪动,,开不了机,就算开机几秒钟... 佳木斯大学怎么样能降级 为什么父母介绍的相亲对象都是歪瓜裂枣? ...的麦子卖不出去,天在下雨我真想办一个面粉加工厂可是没那么多钱_百... 请问,黑龙江文科454分,报一、二志愿分别佳木斯大学和哈尔滨学院能否降段... 佳木斯大学地理位置及气候条件 我们这是农村 有好的铁工厂(加工标准件的) 可我不想做这行,地也不多... 什么药简称赛 一锅四星的问题 我的DM500S原来一锅四星,主收到115,偏收到125、134、138,一切正常。后来... H1受体主要药物 八字成语知错就改后面是什么? 一锅4星选哪几颗卫星好,要有高清台的和凤凰卫视。拜托了各位 谢谢 带孩子暑假去厦门怎么玩? 目前我国和多少个国家有领土纠纷? ...这是360骚扰电话拦截界面,此状态下,骚扰电话拦截是开启的还是关闭的... 苹果360骚扰拦截,我选的接听并立即挂断,怎么老是接不到啊,还是提示未接... 朱自清写的2000字以下的的散文有哪些 魔兽世界法师变形雕文怎么镶不上去啊