| VB声明 | |
| Declare Function GetKeyboardType Lib "user32" Alias "GetKeyboardType" (ByVal nTypeFlag As Long) As Long | |
| 说明 | |
| 了解与正在使用的键盘有关的信息 | |
| 返回值 | |
| Long，零表示出错。否则返回下述值之一 | |
| nTypeFlag=0 | 1——PC或兼容的83键键盘；2——Olivetti102键键盘；3——AT或兼容84键键盘；4——增强型（IBM）101或102键键盘；5——Nokia1050键盘；6——Nokia9140键盘；7——日文键盘 |
| nTypeFlag=1 | 任何值，由厂商决定 |
| nTypeFlag=2 | 1——10个功能键（即 F? 键）；2——12或18个功能键；3——10个功能键；4——12个功能键；5——10个功能键；6——24个功能键；7——由厂商决定 |
| 参数表 | |
| 参数 | 类型及说明 |
| nTypeFlag | Long，可设为下述值之一 |
| 0——返回键盘类型 | |
| 1——返回键盘子类型 | |
| 2——返回键盘上的功能键数量 | |