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

VB中播放WAV文件

HTML文档下载 WORD文档下载 PDF文档下载
VB中播放WAV文件
作者:赵鹏
在多媒体软件的开发设计中,声音是一个相当重要的多媒体元素,优秀的声音设计会为多媒体软件增色不少。而WAV格式的声音文件是一种最常用的声音文件格式,也最容易得到,比如通过Win 95中的“录音机”程序,利用麦克风就可以非常简单地录制WAV文件。VB是一个相当经典的多媒体开发的工具,在VB中播放WAV文件的方法主要有这样几种。

一、利用OLE控件
建一窗体,用鼠标选择OLE控件,在窗体上拖出OLE区域,在图一的窗口中选择新建和声音然后按确定键就完成了在窗口中添加OLE控件,如图二。
这样就可以在OLE控件的ResourceDoc属性中选择所要播放的文件,程序运行时双击OLE控件即可。
在实际的程序设计当中,往往需要单击某个图标或按钮来控制声音的播放,其实现方法是这样的:首先将OLE控件的VISIBLE属性设置为FALSE,然后在图标或按钮的单击事件中编写如下的程序:
Private Sub Contol_Click()
OLE1.Action = 7
End Sub
二、利用MMControl控件
VB5.0提供了许多设计多媒体的控件,在PROJECT/COMPENENTS/CONTROLS中选择MMControls 控件,窗体上就出现了多媒体控件对象,在这个对象上有不同的图形功能标识,其名称从左到右分别是Pre、Next、Play、Pause、Back、Step、Stop、Record 、Eject 如图三。
这个多媒体控件可以播放多种格式的声音,播放WAV格式声音文件的程序代码
Private Sub form_load()
MMControl1.DeviceType = "waveaudio"
MMControl1.filename = "c:\win95\media\ding.wav"
MMControl1.Command = "open"
End Sub
'以下是为图形标识Play事件编写的代码
Private Sub MMControl_playclick(cancel As Integer)
MMControl1.Command = "play"
End Sub
当运行这个程序时,MMControl控件中的Play键被激活,点取此按钮即可播放ding.wav文件。
在实际的软件设计当中,更多的情况是鼠标点击按钮或图标来控制声音的播放, 其实现方法是这样的:首先将MMControl控件的VISIBLE属性设置为FALSE,然后在图标或按钮的单击事件中编写如下的程序:
Private Sub Control1_Click()
MMControl1.Command = "play"
End Sub
运行程序时单击相用的按钮或图标,WAV文件照样可以播放。用自行设计的按钮或图标取代多媒体控件中的固定按钮,可设计出更加灵活方便的用户界面。
三、利用VB的API函数
在窗体的DECLARATIONS(声明)中输入如下代码:
Private Declare Function sndPlaySound Lib "winmm.dll" Alias "sndPlaySoundA" (ByVal_lpszSoundName As String, ByVal uFlags As Long) As Long
'lpszSoundName是一个字符串变量,表示一个WAV格式的文件名。
'uFlags 用于设定播放状态的各种选项。参数值为0X00时,实现同步播放,参数值为0X01时实现非同步播放。
在命令按钮的单击事件中输入如下代码:
Private Sub Command1_Click()
Dim plays As Long
plays = sndPlaySound(“E:\WINDOWS\MEDIA\DING.WAV", &H0)
End Sub
运行时单击命令按钮即可播放WAV文件。

在VB.NET中用AT命令发送手机短信(SMS) 修改 WordPress 的 Flash Video Player 插件,使视频播放器显示封面图 JQuery和CSS实现图片幻灯片显示 JQuery操作Ajax的基本方法 点评两个网站: SEO 做得好, 并不等于有访问量. jQuery右键菜单(Context Menu)插件 创建vpn服务器解决远程接入的问题 用JQuery插件轻松实现accordion折叠菜单 用VBA为EXCEL文件加个登录对话框 Android模拟器入门 Android GSM驱动模块详细分析 农行网上在线支付平台接口安装详解 Android开发中实现跨进程通讯的AIDL接口 用CSS样式展现可打印页面 Android搭建NDK开发环境 VC++、MFC最好的开源项目 Android中电话和短信服务的包分析 一位Android开发者的赚钱经历 让网页中的图片随屏幕滚动,并避免与文字重叠 Hello bat - DOS BAT批处理编程入门教程(一) 变量 - DOS BAT批处理编程入门教程(二) Android编程获取网络连接状态(3G/Wifi)及调用网络配置界面 程序流程控制基础 - DOS BAT批处理编程入门教程(四) For循环语句详解 - DOS BAT批处理编程入门教程(五) Android编程之实现GPS定位 android编程实现仿iphone的tab效果 系统变量 - DOS BAT批处理编程入门教程(三) Android编程获取手机的IMEI Android开发中14个很有用的编程技巧 Android蓝牙栈bluez使用方法 Android模拟GPS数据生成kml和nmea文件 UlraEdit? 四舍五入的函数是什么?? 帮帮忙!!!我编译出这问题?? 请问:发现病毒:生成folder.htt,还有后缀都是htt的其他文件,用kv3000杀,提示kbs\kj,请问是什么病毒,怎么杀毒(急)? ie问题有没有碰到过 打开adsl的猫机器能自己启动为什么? 神洲数码怎样? linux中如何得到某个网络设备的ip地址? 请教ADO的Recordset对象的Delete的问题 请问jbuilder的参考书,哪本比较好?市面好像种类比较少 请问怎样获得临时表的记录? @@@@@@@@@@如何使我的折线图随着时间移动@@@@@@@@@@ 菜鸟问:各位大哥看c++ primer的时候是用什么编译器? 神洲数码怎样? jsp如何将web页面的String型转换为long型? 极容易的问题 ,先来先得! 大虾,救命啊!!!!!! jsp如何将web页面的String型转换为long型? ★★★帮忙翻译一句话!谢谢★★★ **冗余醒目**《如何在输入的时候减小冗余》**冗余醒目** 倡议书:维护您的网络权益 [100分,两日内结]怎样在jsp中得到我的数据 两个菜鸟问题,送分拉 线程与消息??? c、odbc、嵌入式sql的关系? 简单的重载问题! 用<input type="fiel" name="test">时,怎样判断输进去的文件是硬盘上实际存在的? 请问哪里有eclipse 下载? FINDING SOMEBODY! 显示器不亮,请帮忙,解决给100分 写在3.15黎明的前夕 **冗余醒目**《如何在输入的时候减小冗余》**冗余醒目** 各位,CSDN的论坛都是用些什么工具开发的?? 请问个位大虾,我的程序为什么不能执行(TC++3.0) 在VC中怎么调用IE来显示一个页面? 怎样在新开的页面给已开的页面上的一个TextBox插入新的字符串 [转贴]网络版权问题 **冗余醒目**《如何在输入的时候减小冗余》**冗余醒目** 用purify测试过的release版本怎么在别人的计算机上运行有问题? 如果用asp连接mysql,请问连接字符串是什么? 我要做一个在小型的对等网上运行的数据库软件,用什么方法好点? 如果用asp连接mysql,请问连接字符串是什么? 请高手帮我解答一个关于在ASP中调用存储过程的问题? 怎么输入繁体字? 足彩-03010期:1033031110310 请教高手在DELPHI里怎样实现把一个文件存储到ORACLE上, 然后又如何调出来使用?? 我快疯了救救我!!!!!!!!!! 我为什么要做个刁民? 屏幕上显示绘多条曲线,要对每条曲线单独进行操作如何实现? 怎样避开程序对softice和trw的检查 想学ACCP不知道社会的认可度? 肺内气体的交换的原理是:气体向低浓度处扩散,直至两边气体平衡,那为什么与血液进行了气体交换后二氧化碳多于氧气,应该是一半的一半嘛? 什么是KIC炉温测试仪?KIC炉温测试仪有哪一些功能?亚太有没有代理商? 高中物理竞赛预赛、复赛、决赛是在高几开始,分别有什么侧重点吗 效率高得机械,功率一定大是对的吗,做工快的机械呢 如图所示,一定量的理想气体经历bca过程时放热200J,则经历adbca过程时,吸热为 A,1200J B,1000J C,700J D, 电子切于磁场边界入射会受洛伦兹力吗? 忙碌的近义词,连续的反义词,谨慎的近义词 熔化和凝固那个放热那个吸热啊拜托各位了 3Q道理上讲不过去啊 带电粒子是否在磁场边界运动时偏转粒子在水平线段AB上运动,AB上边有磁场,下边没有.(AB为磁场边界,不受重力.)该带电粒子是否受电场力偏转? 机油泵的油的浓度与开启压力有什么关系转子组件机油泵用的 油的浓度和他的开启压力的高低有关系吗 还有流量 水泥厂的烟囱是怎样建起来的 长方体金属块浸没在水中,写出测量它所受浮力大小的试验方案(1)写出2种方案(2)写出运用的物理原理,试验器材,(3)写出最后的计算式(用设定的物理量符号表示) 二氧化硫与压力的关系,也就是压力怎样影响二氧化硫的浓度 最好有解题步骤的. 会跳的纸青蛙怎么折才能跳得远 冷负荷与冷量的关系? 水泥厂点火升温过程中应该开着烟囱帽呢还是关着烟囱帽 跳起来纸青蛙的折法在超感神探第一集里,男主角折了一只纸青蛙放在女主角的桌上,然后离开,一会过后纸青蛙自动跳了起来,好像被遥控了一样,请问那种纸青蛙怎么折啊? 下列实验操作中在月球表面难以完成的是A.蒸馏 B.C.过滤 D.蒸发 旋窑水泥厂烟囱监测氮氧化物超标说明存在什么问题? 用笔尖接触平面镜,观察笔尖和笔尖像之间的距离为6毫米,请问平面镜的厚度为多少原因 高中物理竞赛重点考点 做黄铜压铸模的HM1钢淬火选在何种温度较好?做黄铜压铸模的HM1钢淬火温度介绍980-1090淬火,那么请教各位可不可以把温度提高到1120呢?回火温度700 谁发现带电粒子磁场中受力公式?BWQ是谁发现的公式?BIL又是谁发现的?都叫啥公式 比如F=MA叫牛顿第2定律第一行不是BWQ 是BVQ 如何将云台安装到三脚架上?曼富图808RC4云台+百诺三脚架.安装起来有点费劲,求指导, 硅石熔炼炉哪里有卖的啊? 问下:通电导体在磁场中受力的公式 二氧化硅和金刚石用化合键构成的物质中为什么没有分子间作用力 紧张近义词是什么? 食品中水分的三种存在形式是什么除了游离水、结合水还有什么…… 二氧化硅中不存在分子,为什么呢 紧张的近义词是啥是什么 如何用食品分析方法区分水分存在的不同形式 为什么灭火器过期了就不能用了?如果用了能怎样? 火车上能跳起来吗? 食品中水分有哪些存在 为什么沿磁场方向导体不受力的作用?公式知道,有个夹角的关系.可是,能不能不通过公式说明?我觉得即使平行,会不会沿着导线方向有个拉力什么的呢?怎么会不受力呢? 紧张的近义词111111111 单位换算题, 螺线管内部均强磁场 不受力的作用吗 紧张的近义词可以是慌张吗? 食物包括水吗 为什么空气中氧气的含量是恒定的? 紧张的近义词是慌张吗? 三个完全相同的 圆柱体,如图叠放在水平桌面上 ,将C柱放上去之前,AB两柱体之间接触而无任何挤压,假设桌面和柱体之间的摩察因数为M,柱体与柱体之间的摩察因数为N,若系统处于平衡,M和N必须 同体积的冷水和热水分子间的平均距离谁的大? 环戊烷多氢菲是什么东西?还有其他什么名字? 三个半径相同的无限长圆柱两两垂直相交,问三个圆柱的公共部分是什么形状,体积多少?三个半径相同的圆柱两两垂直相交,可设x轴,y轴和z轴分别为三个圆柱的中轴线,三圆柱半径都为R,且都是 干净的反义词是什么 环戊烷是气体还是液体 保持近义词?坚持的反义词?新鲜的反义词? "干净"的反义词是什么? 环戊烷的安全注意事项是哪些? 遗憾的近义词和干脆、警惕、保持的反义词是?如题 要具体 干净反义词 环戊烷怎么念 求助粒子进入磁场时的洛伦茨力方向粒子进入磁场时候,用左手定则判定洛伦茨力的方向,四指的方向是电荷进入磁场的方向吗?比如电子束进入磁场,那么四指的方向应该指向电子进入的方向, 二维的扩散方程是什么啊?浓度与位置的关系? 测波峰焊用什么炉温测试仪最好? 洛伦茨力是什么 国际晚班车:日本今日起举行大规模\"调查指澳洲侨民向往亚洲 首选泰国、中安倍护卫车连生交通事故 日媒称尚无前“乔布斯”库彻跪地受聘联想 成为联巴黎迪斯尼乐园海盗船发生意外 5岁男数据显示美遣返非法移民人数达6年来最德国法兰克福市计划在闹市区巡警肩上装澳大利亚一养老院发生毒杀案造成二死一泰国国会再开赦免法案审议 政治博弈错联合特使称如无叙反对派参与 将不会举日本内阁法制局长官:日本变更宪法解释澳老汉在米面中掺麻黄碱企图蒙混过关被旧金山地方检察院举行反家暴妇女维权座加拿大女子相亲网站“钓男人”吃免费餐以色列批准新建1500套定居点住房遭美国50州首富名单出笼 盖茨巴菲特仍澳洲男子将宠物店名犬藏入裤裆内带走接日本研究发现治疗糖尿病和代谢综合症物埃及穆兄会下属组织拟在穆尔西受审当天日本学生12万粒杏仁膏立体再现法国印调查指澳洲侨民向往亚洲 首选泰国、中世界第一个水下摩天大楼!群嗨时代 凤姐的爱 看富二代是如2016,如何让你在朋友圈里更受欢迎三个动作!让你减肚子瘦手臂!!家,很平淡,爱,很简单,你好,2017辆伤不起的车,修前修后相差3.6倍一宠一娃,无法抗拒,以后就这么养2016全国新年登高健身大会举行 百他们用了一辈子时间,只做这样一件事.这几个国家在2015年油价暴跌中来了男性的YY能力能强到什么程度?托希尔:冬季不会盲目引援某飞机物的开箱MEN\\\'S MA你不看,永远也不知道这13个微信号原如何玩着把钱赚了?2016第一天,致自己!所有商业模式,最赚钱的无非就这三种!向你转账86400.00元欧盟-乌克兰自贸区协定正式生效2016年首届广西村落文化论坛在广西史上最全的车内按键图解!你真的都知道
备案号:鲁ICP备13029499号-2 说三道四 www.s3d4.cn 说三道四技术文摘