VB实现键盘控制蜂鸣器发声代码,按键盘上的A-Z键PC喇叭会发出声音。GetAsyncKeyState(VirtualKey)返回非零值,除非指定按下某键VirtualKey指0到256之间,Beep函数:使用PC内部喇叭播放声音,   频率:37到37767   周期:1000ms=1sec