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

使机箱内的小喇叭发出不同的声音 -VB资料

HTML文档下载 WORD文档下载 PDF文档下载
使机箱内的小喇叭发出不同的声音 -VB资料

请问在VB5中如何使机箱内的小喇叭发出不同的声音?
- chengdx
回答1:
Mmsound.drv 是小喇叭的系统接口 ,很多API的书都有用法介绍
- 219 张晶
回答2:
使用VB中的beep语句,但这只能发出一种声音。如果想发出不同声音,可以
使用API函数。详情如下:(摘自VB-Helper)
Use the Beep API function.

This example demonstrates two interesting things. First, it shows how to
make a beep of any frequency and duration rather than using the standard
tone you get with the Beep statement.

Second, note that the Beep API function has the same name as Visual
Basic's Beep statement. To differentiate them, you can assign a new name
to the Beep API function in its Declare statement. It is known as "Beep"
in the library (the Alias statement) but it is known as APIBeep to the
program.

You can use this technique to differentiate between functions with the
same name, or you can use it to give API functions a name that is easier
to write (for example, if the API name is very long).

In the declarations section:

Option Explicit
Private Declare Function APIBeep Lib "kernel32" Alias "Beep" ( _
ByVal dwFreq As Long, ByVal dwDuration As Long) As Long
To make a beep lasting 500 milliseconds with frequency specified in the
TextBox txtFrequency (try 1000 for starters):

Private Sub Command1_Click()
Dim frequency As Long

frequency = CLng(txtFrequency.Text)
APIBeep frequency, 500
End Sub
- Prisoner
【一周观察】动辄9位数以上的投资,云数据中心缺口巨大! 硬件创业到底有多火? 知名网站分享:PHP代替Perl,Redis置换MySQL,日处理过亿PV 涨姿势了:Unity CEO聊如何玩转开发者生态 移动周报:再造Ruby女神背后的开发故事 超算什么都弱爆了:模拟一秒人脑计算需要8.3万处理器40分钟 人才短缺不能只靠等 看分析人士给硅谷的3个方案 九个相当有吸引力的WebGL演示 巨人网络朱永明谈运营:游戏就是社会的缩影 Dragon Forged创始人:不想当空军的开发者,不是好程序员 创业者应该怎样走出idea迷宫? TIOBE 2013年8月编程语言排行榜:Java领衔称霸 Gartner新报告:为改善风险管理,云服务合同需要更透明 没有银弹:探讨 Java 8 新增特性的优缺点 SDCC 2013议题更新 Pinterest架构实践、推荐系统、微信应用... 拥有82944个处理器的超级计算机 40分钟才能模拟一秒人脑活动 剑指IE10 最新测试版Chrome增加更多触摸屏功能 理性对待“云”——冲向“云”之前你需考虑的事 为Ruby On Rails开发者准备的5款IDE 一位开发人员的生日愿望清单 当“硅”已走到尽头,我们又该用什么去维系摩尔定律? 高端大气上档次 8位iOS顶级女程序媛 谁都可以做开发者:微软推出Windows Phone Web工具 Mozilla正式发布Firefox 23 新增混合内容拦截 网络监控功能 14条建议,使你的IT职业生涯更上一层楼 依托微信的电商产品实践——SDCC 2013讲师潘凡专访 IBM将向Google、英伟达等授权Power架构技术 人脑研究将推动下一代网络革命?从大爆炸到大收缩 H3C携手F5将“空转”数据中心变为“分布式数据中心” W3C小组发布Web存储API推荐标准 开发者必备的6款源码搜索引擎 在dll中能不能声明一些类,供外部程序调用?能给个例子最好; 各位,请帮我看看! weblogic6.1中配置好了oracle9i的连接池,名为oracle9,但是编程工程中如何使用这个连接池,希望答复!! MSXML2.XMLHTTP 是什么组件? 颜色填充 我要用到GPRS的知识,了解者请赐教! 请问在程序运行期间执行label1.text="***"怎么不变啊! 大家帮我看看,为什么不能选择divx压缩? 打开excel文件时提示“重载open方法未获得1参数” 帮忙写报表查询,我搞不定,请求帮忙!!!比较复杂!!!! 自定义标志的问题 着急! 今天在CSDN上终于变成三个绿色的小三角了,高兴……散分(前十位每人10分)! 如何把一个文件中text的值传到另一个文件中去? 路由器如何设置?? apache2配置文件问题,请大家指点迷 PPS文件用什么软件打开,谢谢! 填充颜色 svhost.exe程序错误 求HOOK例子 php得到xml文档中的中文无法正常显示问题 高手请指教一下思路!!!!!!!! 奇怪的乱码问题!急急!在线等待! 填充算法 今天我过生,放分(来者有分) 日期时间换算问题 填充算法 哪里可以下到SpatialWare for SQL Server 的解密文件 怎么拖动一个控件拖动一个窗口 tomcat4的server.xml配置文件是否有问题,请大家帮忙! 填充算法 谁能给我JDK1.4下载的地址啊?谢谢了,TOMCAT的也要! 请问各位同仁,如何关闭SHELLEXECUTE()打开的应用程序。 有没有图形化的TrackBar! 填充算法 急问:中文库表 大家看看排序有什么问题? 各位大侠:在sql语句中如何滤除查询后的重复字段!!本小妹在线等候!切急!! 颜色填充算法 颜色填充算法 Treeview中如何得知所有子节点的数目(不展开节点的前提下) 重分求取Rabin-Miller算法源码及Lehmann算法源码!!!!!!!!!!!!!! !急问关于XML问题,在线等待,100奉送 redhat9 linux显示中文的问题?? 不知道这样的问题,大伙是否遇到:使用ADO.net执行比较复杂的统计操作(运行时间为15秒左右)使用try{}catch{}捕获到摸民气秒的问题。比 关于数据库的移值 VC6好像不支持ADO啊?是不是? 诚寻今年高程考试代笔。待遇优厚 vb新手,请问一个关于使用picturebox放大图像的问题 60M空间,什么版本的LINUX做嵌入式开发好??? 我在MSDN中看到在ie5之后可以在toolbar中使用BTNS_AUTOSIZE按钮样式,可是我不会用? 若(a-1)²与丨b+2丨互为相反数,那么a-b等于多少? 如果a与1互为相反数,则丨a丨等于( )A.2 B.-2 C.1 D-1 若a与2互为相反数,则丨a+2丨等于?不是4 文化内涵是什么?它在马克思主义社会结构体系中的地位和作用. 人类什么时侯成为第三等级的文明?悲哀啊,现在连第一级还不到.几年啊?回予测的说一下我估计数亿年我好想看啊第一就是控治所在星球以级邻近星球第二等级统治所在恒星系统第三等级是统 请问在哪里办暂住证?在哪里办暂住证?我在广州市海珠区中大,布区市场这里. 一套运动服进价240元,如果这套运动服提价5%销售,买一套这样的运动服需要多少元? 燃烧青春 拼搏在即 英文怎么说更好一些 直线y=-2x+1与x轴的交点坐标是? 直线y=-1/2x+1与x轴的交点是( ),与y轴的交点是( )我知道答案,但是我想知道求出来的过程可不可以给讲下,0=-1/2x+1是怎么等于1的? 如果a与2互为相反数,则丨a+2丨等于?丨a-2丨等于?并比较-(-a)与-丨a丨的大小 杭州火车东站地裂女子被卡 建设方称系杭州10岁女童遭“淫魔”猥亵 家长怒广西岑溪炮竹厂爆炸 已致7死19伤海军三大舰队西太平洋演习落幕 今后将北京局地达严重污染程度 “蓝天”只能蒙古国高校新增汉语教学点叙问题联合特使称日内瓦会议有望于数周刘奇葆会见朝鲜劳动新闻代表团以色列轰炸加沙致3人死亡印度烟花厂爆炸至少8人死亡浙江金华婺城区发生一起安全事故 致2失利或让小威变更强国奥与西亚三队同组哈德森“回归”辽宁男篮我不是独裁者彼得汉塞尔荣膺全场冠军蓝军连败穆帅丢魂“贵州车王”称雄公开组“贵州车王”称雄公开组我不是独裁者国奥与西亚三队同组茅台保级再响“红色警报”纳兰斯特赤子仙途冰蝶英雄传营销高手在仙界书剑长安山村小仙医春秋持剑九阴真经之金陵变大修真天地至强掌门神品道圣东佘山园旅游上海音乐厅旅游乌岩岭旅游明清街旅游冯国璋故居旅游张作相宅旅游孙殿英旧居旅游北京林业大学旅游北京钓鱼台国宾馆旅游安义古村群旅游革命烈士纪念馆旅游
备案号:鲁ICP备13029499号-2 说三道四 www.s3d4.cn 说三道四技术文摘