總網頁瀏覽量

2011年10月24日 星期一

[VB.NET] 發出警示音

'讓電腦發出聲音利用Console.Beep()

Module Module1
      Sub Main()
          
             Console.Beep(262,500)      'C(Do)
             Console.Beep(294,500)      'D(Re)
             Console.Beep(330,500)      'E(Me)
             Console.Beep(349,500)      'F(Fa)
             Console.Beep(392,500)      'G(So)
             Console.Beep(440,500)      'A(Ra)
             Console.Beep(494,500)      'H(Si)
             Console.Beep(523,500)      'C(Do)

      End Sub
End Module

沒有留言:

張貼留言