说三道四技术文摘-感悟人生的经典句子
说三道四 > 文档快照

VB用API播放 .wav 声音文件

HTML文档下载 WORD文档下载 PDF文档下载
VB用API播放 .wav 声音文件

利用多媒体的 mciSendString API 函数, 再搭配 mci(multimedia control
interface) 指令, 即可播放 .wav 声音文件, 细节如下:
1. API 的声明:
Private Declare Function mciSendString Lib "winmm.dll" Alias "
mciSendStringA" (ByVal lpstrCommand As String, ByVal lpstrReturnString
As String, ByVal uReturnLength As Long, ByVal hwndCallback As Long) As
Long
注:如果以上的声明放在「一般模块」底下, 应将 Private 保留字去掉。
2. 程序范例:
' 撰写播放声音的一副程序
Sub PlaySound(filename)
Dim cmd As String
Call mciSendString("close MyWav", 0, 0, 0) ' MyWav 这个名称可依需要
来修改
cmd = "open " & filename & " type WAVEAudio alias MyWav"
Call mciSendString(cmd, 0, 0, 0)
Call mciSendString("play MyWav", 0, 0, 0)
End Sub
' 假设要拨放 "c:\windows\Tada.wav"
PlaySound "c:\windows\Tada.wav"

用VB绘制抛物线动画曲线 用VB绘制正弦动画曲线 用VB实现“百叶窗”的图形特效 用VB实现托盘动画图标 用Visual Basic 定制BMP文件 用Visual Basic的Move方法实现动画效果 用Visual Basic与MS-Draw开发通用作图软件 在VB中获取可执行文件及Windows 95快捷方式的图标 在VB中进行各种图形切换的方法 在VB中制作可滚动的图像显示 在图片上平滑移动文字 -VB资料 VB怎样使程序的标题条闪烁? VB制作图像的Mask图 CWinInetConnection-一个封装了WinInet API函数的类 -VB资料 MODEM通讯意外处理-VB资料 MsComm 文字传输-VB资料 PING一个IP地址(向它发送一个数据包并等待回应) -VB资料 SMTP协议简介 (Simple Mail Transfer Protocol) -VB资料 VB5.0 中远程数据库的访问 VB下如何编写CRC校验程序 Visual Basic 6中发送邮件的新方法 Visual Basic通信程序设计 Whois 示例程序-VB资料 Winsock Terminal示例程序 -VB资料 WinSock断开导致客户端问题-VB资料 把Outlook信箱中的附件另存为 -VB资料 保证连网计算机时间同步-VB资料 编写网络寻呼机 -VB资料 编制自已的电话录音小程序-VB资料 程序中如何启动默认的拨号连接-VB资料 打开浏览器并进入指定网址-VB资料 如何在繁體下打開簡體文件名的文件?要求不能用改名的辦法 插入数据到数据库! 高手关注--------送分-----------急急急! 在ASP中如何编程建立索引服务的编录及目录? 在web server application把MEMO字段中带格式(RTF)的内容转换成纯文本? 请问在身份验证中,能否有两个login.aspx??? 急~那篇给vb控件打包文件添加数字签名以便浏览器浏览的那篇文章在哪里? 用vb如何实现模拟雷达界面??欢迎赐教! 如何用CSS控制INPUT的输入外观不是立体的,而看起来是平板的样子,只有一个边线? 用户注册的问题,密码总验证不对,能不能看看错在哪里? 如何使文本框只显示下面的边框? xsl求助~~~ 怎么将int转为CString 有的论坛采用从数据库得到帖子,有的使用shtml,有的使用xml,孰优???还有其他吗? 100分==在JSP中打开word文件的实例 紧急在线等一个很简单的问题 DTPicker 怎样和数据库绑定? 如何动态改变VB报表中Section中的一个与数据环境绑定的rptTextBox的颜色!(100分求教) datediff()这个函数怎么用哪位高手可否给小弟讲解一下急用在线等 和女友分手了,痛苦! 谁有支持中文的带身份验证和邮件群发的ASP.NET邮件组件? 关于多个表通过相同的字段级联的问题,进来看看,一定给分! windowd server 2003许可证问题 谁有支持中文的带身份验证和邮件群发的ASP.NET邮件组件? 求合作伙伴——推广抗非典病毒的消毒剂!!! 在表分区中,按某个varchar2的字段的值和范围如何分呢 我又來了,不僅你們煩,我更煩. 服务器端与客户端的问题 服务器端与客户端的问题 最后的问题,谢谢帮我看看 发现MS WINDOWS版的C标准库一个在BUG!!!!! 在用VFP操作EXCEL时出现无法用字段内容填充单元格问题,请各位帮忙看看. 算法 救命! 有没有rmi的好例程,一用就灵,急 fast report 和 qreport 到底应该用哪一个???(来者有分!!) 关于“数据结构书”的回应——版主莫删 如何进入另一个对话框 在一字符串中怎样取出某一个字符出现的次数. 急! infopower 2000、 3000、4000 Password?? 自定下载的问题,请教高手 如何屏蔽播放.wav文件但找不到相应.wav文件时发出的默认声音? 如何打开另一个对话框 政治因素对我国军事专家的困扰[ZT] if ((btime==null)&&(etime==null )) 请教 一位女同事辭職,一位男同事說跟我有關,鬱悶中... 请问如何在B/S模式下,在页面上实现,如word,excel中的编辑功能? 如何画一个二元函数的图象 急!高分求教:Epson TM U300微型打印机打印作业丢失问题!(100分) word中如何做浮动窗口或按钮等? 今适有知而斯之的意思? 这些题有那几题是错的,求正确答案, 甲、乙两数的平均数是45,已知甲、乙两数的比是2:4,甲乙两数分别是多少? 一直忧虑科学家预言的小行星撞击地球,怎么都走不出来,怎么办?我一直忧虑科学家预言的小行星撞击地球,怎么都走不出来.有七八年的了,别笑话我,我真的就是怎么都不出.05年的一天在家看电 求第10题的解答过程,有错的请求正确答案急 有一群小孩,他们中任意5个孩子的年龄之和比50少,所有孩子的年龄子和是202.这群孩子至少有多少人?要写出解题步骤!必写,不然不给分! 学生扎辫子的方法,早上起来要自己扎的,好看一点的, 求问青蛙的什么地方能振动发声《物理》 日勺念什么字 平行四边形的对角相等吗? 青蛙靠哪里振动 一辆汽车从甲地开往乙地要10小时,一辆客车从乙地开往甲地要8小时.汽车先开出2小时后,客车再开出小时后与汽车相遇? 已知四边形一组对角相等,证明这个四边形是平行四边形 青蛙如何发声?它的叫声洪亮的原因? 甲,乙两地相距126千米,一辆汽车从甲地开往乙地,行驶了九分之七还多5干米,行驶了多少千米? 若函数y=x^2-4px-2的图像过点A(tanα,1)及B(tanβ,1),求sin2(α+β)的值2p/(1+p^2) 青蛙是怎样发声的``青蛙``蜜蜂``蟋蟀``蝉(知了)是怎样发声的`` 已知函数f(x)=sin(2x-π/3)(x∈R),给出如下结论:1、图像关于直线x=5π/12对称;2、图像的一个对称中心是(π/6,0);3、在[0,π/2]上的最大值为(根号3)/2;4、若x1,x2是该函数的两个不同 半径为5的圆O内有一点P,且OP=4则过点P的最短弦长为( ),最长弦长为( ) 观此可以知画理矣 理的意思 求角bdc=90度-1/2角a, 一组对边相等,一组对角相等的四边形____(填能或不能)判定为平行四边形.(求证明过程 ) 非知之难,行之为难;非行之难,终之斯难.不要典故,只要意思! (1)角BDC>角A (2)角BDC=角B+角A+角B 已知:tanα=3/4,tanβ=12/13且都是锐角,求α+β. 历史上最大的小行星撞击地球事件是在什么时候?直径有多大?威力有多大?是在寒武纪还是奥陶纪还是其他时候?注意是最大的小行星 如图,△ABC中,角B和角C的外角平分线交于点B,求证角BDC=90度-2分之1角A 四边形一组对角相等一组对边平行为什么不能判定平行四边形两个三角形AAS啊?为什么不是判定定理?求反例?那为什么不是判定定理啊?不能直接判定? 你怎么看待小行星撞击地球事件? 求帮我写马克思主义的作业最好提前完成. 为什么在判定平行四边形中,不能用对角相等直接判定?是两组对角都平行 怎么倒的(X1-X2)+3/X1-3/X2=(X1-x2)[1+3/X1X2] 马克思主义主要写什么? 已知三角形ABC为等边三角形,O为三角形内一点,AO=根号5,BO=根号3,CO=根号2,求角BOC. 若一元二次方程x^2+3x-1=0的两根分别为x1,x2,则x1+x2=-3,x1x2=-1,x1^2+x2^2=? 在△ABC中,CD⊥AB于D,BE⊥AC于E,CD与BE相交于H,且CH=AB,则AE=CE-BH,请说明理由 在三角形ABC中边AB=2,BC=1角ABC=60点O为AC上一点若BO=二分之根号七试确定O点位置 如某方程的两根都在区间(1,4)内那两根有什么限制条件?还有某方程一个根在(-2,0)内,另一个根在(1,3)内...什么叫内?两根又有什么限制条件? 秦始皇陵墓什么时候发掘?期待! 已知αβ都是锐角 cosα=4/5 tan(α-β)=﹣1/3求sin(α-β) 青蛙呱呱叫是由于它的鸣囊在 秦始皇的墓什么时候能挖掘? 初二历史专题知识归纳整理三方面 经济 思想文化 只要写时间 和事件就好了 如果答案给的好的话 一辆快客上午8:00从甲地开往乙地,到下午2:00正好走了全程的40%,这时汽车离乙(列式计算.)一辆快客上午8:00从甲地开往乙地,到下午2:00正好走了全程的40%,这时汽车离乙地还有252千米.问 秦始皇的陵墓什么时候才能挖掘 半径为5的圆O内有一点P,且OP=3则过点P的最短弦长为( ),最长弦长为( ) 等腰直角三角形,直角边长50cm,另外两角都是45度,求斜边长度 30°,60°,90°角的比是多少?知道一个六十度角的长度该怎么知道九十度和三十度角的长度 为什么说森林是人类的朋友?请联系生活实际谈一谈 一个三角形,已知两角度数,和一条边长,求斜边?一个三角形,已知两角度数30度,60度,和底边长790,求斜边?我想要求斜边的过程,或是公式?? f(x)=|x-1|-|2x+1|画出图像,并求值域过程详细会追加奖励 系统解剖怎么学 姓项的有多少人 一块长方形小麦地,把它的长和宽各增加5厘米后,这块小麦地的面积增加了105平方米.这时它的周长是多少?·打错了 应该是增加5米 条件概率中的P(AB)如何计算? 马克思列宁有什么著作用什么语言写的?我个人觉得他们都是非常有思想见解独到的人,但不想看他们的思想经过技术改造的中译本,因此想学学他们的语言,看看他们真实的面貌.非常感谢二楼 已知f(x)=log2(1-2x),(1)求f(x)的定义域;(2)求使f(x)>0的x的取值范围. 条件概率:P(A∩B|A)≠P(B)对不对.为什么?条件概率的问题.P(A∩B|A)≠P(B) 这题错在哪,正确答案是: 第十题 求详细过程 日本将启用自卫队军官任国家安全保障局日驾校人性化服务多 学车之余可美甲还美国家安全局称奥巴马对监听默克尔一事美国处方药价格高昂 民众被迫违法购外医改网站技术问题百出 奥巴马上教堂也阿根廷举行中期议会选举 女总统执政联阿根廷举行中期议会选举 执政联盟面临西班牙巴塞罗那发生列车脱轨事故 造成马达加斯加大选结束 各方观察团认为投格鲁吉亚总统大选启动 共计23名参选美国航空公司改签费攀升 消费者“斗智美国旧金山湾区万圣节前多起驾车枪击 韩“独岛”宣传片擅自使用日剧画面 视美共和党参议员计划推迟耶伦的美联储主俄圣彼得堡市长称正在考虑申办夏季奥运格鲁吉亚总统选举:执政联盟候选人以6篠田麻里子圆空姐梦 助阵桃子航空新航中国品牌闪耀约堡国际车展(组图)土耳其总理:只有中国退出才可能购别国南海问题不能仅靠“海洋法公约”加拿大女星完美天使面容(组图)乐视体育战略入股世界体育集团 开创体乐视体育囊括亚足联中国大陆全媒体版权意大利车手获2015年环海南岛自行车潘采夫:南京送我一次婴儿般的睡眠豪华更衣室!北京男篮众将欣喜妈妈最怕的,是把你弄丢了---防走失驰为Hi8,玩够了安卓还能办办公?一起吐槽 | 在哪个瞬间突然想好好学林清玄 | 我看到落在碗中的灰尘,不习近平3次座谈透露十三五发展3大指针深夜爆尿 | 关键词:小花旦、备胎、面朝大海,吃喝玩乐!一家三口的第一次打飞机之路 - Hotas入手(Ha火腿肠炒杏鲍菇没人没钱没资源产品怎么做推广?俞敏洪:合伙人,合的不是钱,而是人品我们这一代人的困惑(点击上百万的好文斑斓戚风新人拍婚纱照最关系的问题新人拍婚纱照最关系的问题还有多少单身狗?这个给你们当女朋友了
备案号:鲁ICP备13029499号-2 说三道四 www.s3d4.cn 说三道四技术文摘