VB中发出不同频率的声音

来源：百度知道 编辑：UC知道 时间：2024/05/16 18:46:39
如题
好像是用什么函数，具体我忘了，希望懂的人说一下函数和用法

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

Private Sub Command1_Click()
Beep 500, 1000 '500表示频率，单位为㎐；1000表示持续时间，单位为㎳
end sub