Beep

通过计算机扬声器发出提示音。

语法：Beep

提示音的频率和持续时间取决于硬件和系统软件，因计算机而异。

示例

本示例使用Beep语句通过计算机扬声器连续发出三次提示音。

Dim I%
For I = 1 To 3   ' Loop 3 times.
   Beep          ' Sound a tone.
Next I

另请参阅

• DoEvents函数
• Shell函数
• MsgBox函数