Article ID: 161232
Article Last Modified on 7/13/2004
Enum Keys1
TabKey = 12
EnterKey = 13
SpaceBar = 32
End Enum
Enum Keys2
[Tab Key] = 12
[Enter Key] = 13
[Space Bar] = 32
End Enum
Private Sub Command1_Click()
Dim i As Long
i = Keys1.EnterKey
MsgBox i
i = Keys2.[Space Bar]
MsgBox i
End Sub
Enter Key
Space Bar
Tab Key
Additional query words: kbVBp500 kbVBp600 kbVBp kbdsd kbDSupport kbCompiler kbVBA
Keywords: kbhowto KB161232