Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer) Select Case KeyCode Case vbKey1 Print "AAA" Case vbKey2 Print "BBB" Case vbKey4 Print "CCC" End SelectEnd Sub
Option Explicit是强制声明变量,不声明不允许用,这样会有效减少程序的BUG,不用当然也可以。
强制变量声明的语句,不用没影响,但最好用