Beep

---

Beepステートメント

構文

Beep

解説

ビープ音を鳴らします。

ビープ音の鳴る時間と周波数はコンピュータの機種によって異なります。

サンプル

次の例は、ユーザー入力した回数のビープ音を鳴らします。

Sub Sample()
    Dim num As Integer, i As Integer
    num = InputBox("ビープ音を鳴らす回数を入力してください")
    For i = 1 To num
        Beep
    Next i
End Sub