用VB编程 获取键盘类型的源代码工程 应用系统API函数