新闻资讯
看你所看,想你所想

Beep函式

Beep函式

该函式可以通过扬声器发出提示音

语言参考

Beep 函式
通过计算机的扬声器发出声响。
Public Sub Beep()
备注
声响的音调与持续时间取决于硬体和系统软体,因此随计算机不同而不同。
注意
Beep 函式需要 SafeTopLevelWindows 级别的 UIPermission,这可能会对它在部分信任情况下的执行产生影响。有关更多信息,请参见请求许可权和 UIPermission Class。
示例
本示例通过 Beep 函式,使计算机的扬声器发出一个长的、不间断音频。
Visual Basic 複製代码
Dim I As IntegerFor I = 1 To 100 ' Loop 100 times.Beep ' Sound a tone.Next I
智慧型设备开发人员说明
不支持此函式。
如果想让Visual Basic使用Beep发出更多更好听的音乐,则在开头定义函式:
Private Declare Function Beep Lib "kernel32" (ByVal dwFreq As Long, ByVal dwDuration As Long) As Long
然后就可以使用多参数的Beep了,比如:
Beep x,y
其中x代表声音的调子,y代表发声的长短
调子上限值:32767,下限值:37(测试数据来自PowerShell)
例如:Beep 600,500就表示让Visual Basic在500毫秒内唱出一个600的调子
Beep函式的参考用法Beep函式的参考用法
要求
命名空间: Microsoft.VisualBasic
模组: Interaction
程式集: Visual Basic Runtime Library(在 Microsoft.VisualBasic.dll 中)
请参见
参考
Visual Basic 运行时库成员
其他资源
播放声音

API函式

BOOL Beep(DWORD dwFreq, // sound frequency, in hertzDWORD dwDuration // sound duration, in milliseconds);
程式示例:
#include <windows.h>int main ( void ){int i = 2 ;while ( i-- ){//Beep函式,使扬声器发出简单声音//要调用这个函式需要加上头档案windows.h//在Visual C++ 6.0下运行通过Beep(1000,1000);}return 0;}

异常状况

ExceptionCondition
HostProtectionException
在不允许访问用户界面的伺服器(例如 SQL Server)上执行此方法。

相关推荐

声明:此文信息来源于网络,登载此文只为提供信息参考,并不用于任何商业目的。如有侵权,请及时联系我们:yongganaa@126.com