编辑本段Visual Basic 语言参考
Beep 函数
通过计算机的扬声器发出声响。
Public Sub Beep()
备注
声响的音调与持续时间取决于硬件和系统软件,因此随计算机不同而不同。
注意
Beep 函数需要 SafeTopLevelWindows 级别的 UIPermission,这可能会对它在部分信任情况下的执行产生影响。有关更多信息,请参见请求权限和 UIPermission Class。
示例
本示例通过 Beep 函数,使计算机的扬声器发出一个长的、不间断音频。
Visual Basic 复制代码
Dim I As Integer
For I = 1 To 100 ' Loop 100 times.
Beep ' Sound a tone.
Next I
智能设备开发人员说明
不支持此函数。
要求
命名空间: Microsoft.VisualBasic
模块: Interaction
程序集: Visual Basic Runtime Library(在 Microsoft.VisualBasic.dll 中)
请参见
参考
Visual Basic 运行时库成员
其他资源
播放声音
BOOL Beep(
DWORD dwFreq, // sound frequency, in hertz
DWORD 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;
}