★　Win32 API でビープ音を使って音階を鳴らす
　
'ビープ音を発生させる(1234)
<System.Runtime.InteropServices.DllImport("KERNEL32.DLL")> _
Private Shared Function Beep( _
    ByVal dwFlags As Integer, _
    ByVal dwDuration As Integer) As Integer
End Function
Private Sub Button6_Click(ByVal sender As System.Object, _
                          ByVal e As System.EventArgs) Handles Button6.Click
'Win32 API でビープ音を使って音階を鳴らす
    Call Beep(262, 300)
    Call Beep(294, 300)
    Call Beep(330, 300)
    Call Beep(349, 300)
    Call Beep(392, 300)
    Call Beep(440, 300)
    Call Beep(494, 300)
    Call Beep(523, 300)
End Sub


又は、.NET Framework 2.0 以降の Consoleクラスの Beepメソッド を使って
　　System.Console.Beep(262, 300)
　　System.Console.Beep(294, 300)
　　System.Console.Beep(330, 300)
　　System.Console.Beep(349, 300)
　　System.Console.Beep(392, 300)
　　System.Console.Beep(440, 300)
　　System.Console.Beep(494, 300)
　　System.Console.Beep(523, 300)