用ＢＥＥＰ怎么播放曲子呢
比如我想播放１　５　３　１　１这个曲子
这５个音符的频率一样
应该怎么做

给个简单的例子就行

有这方面的资料教程更好
如有,给个地址

[此贴子已经被作者于2007-3-30 12:46:01编辑过]

Option Explicit
Private Declare Function Beep Lib "kernel32" (ByVal dwFreq As Long, ByVal dwDuration As Long) As Long

Private Sub Command1_Click()
Beep 1000, 1000
Beep 3000, 1000
Beep 1000, 1000
Beep 2000, 1000
Beep 3000, 1000
End Sub

用MSGS波表合成器 128种乐器的声调都可以制作`

　１２　３４　５６　７
对就的低中高音的频率是多少

Option Explicit
Private Declare Function Beep Lib "kernel32" (ByVal dwFreq As Long, ByVal dwDuration As Long) As Long


这两句啥意思

就是英文的意思.