在VB5中如何使机箱内的小喇叭发出不同的声音?

2016-02-19 17:54 9 1 收藏

get新技能是需要付出行动的,即使看得再多也还是要动手试一试。今天图老师小编跟大家分享的是在VB5中如何使机箱内的小喇叭发出不同的声音?,一起来学习了解下吧!

【 tulaoshi.com - 编程语言 】

->-chengdx
  回答1:
  Mmsound.drv是小喇叭的系统接口,很多API的书都有用法介绍
  -219张晶
  回答2:
  使用VB中的beep语句,但这只能发出一种声音。如果想发出不同声音,可以
  使用API函数。详情如下:(摘自VB-Helper)
  UsetheBeepAPIfunction.
  
  Thisexampledemonstratestwointerestingthings.First,itshowshowtomakeabeepofanyfrequencyanddurationratherthanusingthestandardtoneyougetwiththeBeepstatement.
  
  Second,notethattheBeepAPIfunctionhasthesamenameasVisualBasic'sBeepstatement.Todifferentiatethem,youcanassignanewnametotheBeepAPIfunctioninitsDeclarestatement.Itisknownas"Beep"inthelibrary(theAliasstatement)butitisknownasAPIBeeptotheprogram.
  
  Youcanusethistechniquetodifferentiatebetweenfunctionswiththesamename,oryoucanuseittogiveAPIfunctionsanamethatiseasiertowrite(forexample,iftheAPInameisverylong).
  
  Inthedeclarationssection:
  
  OptionExplicit
  PrivateDeclareFunctionAPIBeepLib"kernel32"Alias"Beep"(ByValdwFreqAsLong,ByValdwDurationAsLong)AsLong
  'Tomakeabeeplasting500millisecondswithfrequencyspecifiedinthe
  'TextBoxtxtFrequency(try1000forstarters):
  
  PrivateSubCommand1_Click()
  DimfrequencyAsLong
  
  frequency=CLng(txtFrequency.Text)
  APIBeepfrequency,500
  EndSub
  -Prisoner->->

来源:http://www.tulaoshi.com/n/20160219/1616356.html

延伸阅读
音频管理器 打开音频管理器——点击右侧插孔设置——勾选禁用前面板插孔检测——点击确定即可。 检查管理器声卡 打开计算机——点击管理——点击设备管理器——查看声音、视频和游戏控制器。检查声卡在设备管理器中有没有被禁用(如图)。 解决方法:右键点击声卡查看,如果已被禁用则会有“启用”选项,点...
标签: 电脑入门
问题的具体描述: 电脑有声音,声音也很正常,只是要调节声音的大小需要通过控制面板来调节。也就是屏幕右下角任务栏里面的声音小喇叭变灰了,不能通过它来直接调节音量。 2 对于这个问题的个人看法: 不需要去管它,也是突然它又自己好了,看电视剧的时候想调节声音可以通过放大到2.3倍功能,玩游戏之类的声音打下,大不了去控制面板调节...
标签: 育儿知识
小喇叭是乐器中最适合宝宝学的一门音乐器材,你是否看到电视上吹小喇叭的孩子很神气呢?也想自己的宝宝成为那样人人夸的小神童呢?宝宝学吹小喇叭还有很多的好处哦,我们一起来看看。 小喇叭也称小号,铜管乐器家族的一员,常负责旋律部分或高吭节奏的演奏,也是铜管乐器家族中音域最高的乐器。常用于军乐队、管弦乐团、管乐团、一般爵士乐...
----VisualBasic是Windows平台中最常用的应用软件开发语言,窗口图像缩放、滚动是图像处理、多媒体数据库等应用软件开发中的基本功能。本文将介绍如何用VB5.0实现地窗口图像缩放和滚动技巧,供读者在各种语言系统开发中参考。 ----一、获取图像 ----本文所介绍的图像缩放并没有对真正的图像进行缩放,而是复制一幅窗口图像的真实...
首先新建一个工程,在新建的窗体上添加以下控件并设置相应属性: 控件名属性值 Label1Caption注册表键值: Label2Caption注册姓名: Label3Caption空 Label4Caption注册公司: Label5Caption空 Label6Caption空 Text1Text空 Text2Text空 Command1Caption写入注册表 Command2Caption退出 然后,...

经验教程

431

收藏

41
微博分享 QQ分享 QQ空间 手机页面 收藏网站 回到头部