用VB让计算机发出蜂鸣声
用VB让计算机发出蜂鸣声
错!!!
用API...
'在Form1中。。。
Private Declare Function Beep Lib "kernel32.dll" (ByVal dwFreq As Long, ByVal dwDuration As Long) As Long
'多给我:zhs4907****些分哦
Private sub Form_Load()
msgbox" 下一步你就会听到声音衫肆中,按确定吧 ",VBOKONLY,"或山给我分哦"
Beep 2000 , 300
'发出声音雹携频率值为2000,长度为300的蜂鸣器声音
End Sub
方法:
Beep
或许可以。
Beep()发出的声音不是缺枝你要求的
你可以自己做一个你想要的声音(Nero很好)
复制到'bin\debug\'
然后右键单旁扮芦击,菜单中有添加代码段.(VS2005)
按它的步骤添加播放音频的代码段就好了运带.
相关内容