在VB5中如何使机箱内的小喇叭发出不同的声音？
->-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->
- 最新文章
- 用VisualBasic窗体背景花纹的实现[04-17]
- 用VB实现“百叶窗”的图形特效[04-17]
- 在VB中实现位图的透明放置[04-17]
- VB中任意旋转位图的实现[04-17]
- 如何在VB中直接显示无格式256灰度级图像[04-17]
- 在VB中引用.dbf及索引文件[04-17]
- 相关文章
