Question

vb中关于select case 语句，感激不尽

Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)

Select Case Shift
Case 1
Print "按下了Shift键"
Case 2
Print "你按下了Ctrl键"
Case 4
Print "按下了Alt键"
Case 3
Print "按下了Shift和Ctrl键"
Case 5
Print "按下了Shift和Alt键"
Case 6
Print "按下了Ctrl和Alt键"
Case 7
Print "按下了Shift、Ctrl和Alt键"
End Select

End Sub

请问Select Case Shift中的shift什么意思，为什么可以变成下面的1到7（本人只知道Select Case 后加一个普通变量）

Answer 1

在Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)中，Shift是系统传递进来的第2个参数。
其中第1个参数KeyCode是按键的键盘码，第2个参数Shift表示是否同时按下了功能键（用1~7表示了Shift键、Ctrl键和Alt键的按下情况）

追问

(KeyCode As Integer, Shift As Integer)里面的shift，keycode都可统一跟在case后面，怎么选择呢，这两个在下面基本只出现一个，还有一个定义了可以不用吗~本人自学vb，思路还不是太明白

追答

是可以不用的，如果你想判断按了哪个普通键，就需要用到KeyCode，如果想判断按了哪个功能键，就用到Shift，取决于你自己的需要。

追问

功能键是不是就alt,shift,ctrl这几个？其余普通键？反正case 后面肯定要接 KeyCode 或者Shift这其中一个变量对吧

追答

alt，shift，ctrl叫功能键，其他字母数字就叫普通键。如果在case后面既不接keycode，也不接shift，那么就没有必要用keydown这个事件了，keydown就是用来判断用户按下了什么键的。

Answer 2

KeyDown中专门用来检测Windows专用键Shift、Ctrl、Alt三个键按下情况的参量。
按下Shift键时，Shift参量值为1，
按下Ctrl键时，Shift参量值为2，
按下Alt键时，Shift参量值为4，
下面的3，5，6，7则是以上几个键的组合情况。Shift参量值则是以上参量值的和。

追问

还有一个傻傻的问题，(KeyCode As Integer, Shift As Integer)里面的shift，keycode都可统一跟在case后面，怎么选择呢，这两个基本只出现一个，还有一个不用吗~本人自学vb，思路还不是太明白

追答

这个只是在这里没有用，后一个是专门用来检测那几个专用键的，而大多数键的检测和区分，都要靠前一个参数的。