如题,能不用api就不用api,需要简单的方法

解决方案 »

  1.   

    KeyDown事件和KeyUp事件
    例如:
    Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
        If Shift And VbAltMask Then
            '说明按下了Alt键
        End If
    End Sub更详细的说明请查看MSDN或者简单看一下这篇文档:
    http://www.nywjxy.edu.cn/wjrtvu/softdown/Vb.doc
      

  2.   

    用keydown或是keyup事件,就像楼上说的那样,检测键值按键 键码值 按键 键码值
    F1-F10 112-121 Backspace 8
    Tab 9 Enter 13
    Esc 27 PageUp 33
    PageDown 34 Home 35
    End 36 Ins 45
    Del 46 ← 47
    ↑ 48 → 49
    ↓ 40 符号常数                            Shift的取值 Shift、Ctrl和Alt组合状态
    -                                 0             三个键都没有
    VbShiftMask                        1             按下Shift键
    VbCtrlMask                        2                按下Ctrl键
    VbShiftMask+ VbCtrlMask               3              同时按下Shift键和Ctrl键
    VbAltMask                                4              按下Alt键
    VbShiftMask+ VbAltMask                   5               同时按下Shift键和Alt键
    VbCtrlMask + VbAltMask              6                 同时按下Ctrl键和Alt键
    VbShiftMask+ VbCtrlMask+ VbAltMask     7                同时按下三个键