Beep (statement)

Syntax Beep
Description Makes a single system beep.
Example This example causes the system to beep five times and displays a reminder message. 
Sub Main()
  For i = 1 To 5
    Beep
    Sleep 200
  Next i
  MsgBox "You have an upcoming appointment!"
End Sub