查看键盘按键的AscII码的步骤
查看键盘按键的AscII码的步骤
Option Explicit
	Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
	Static i As Integer
	Print CStr(KeyCode)
	i = i + 1
	If (i > 10) Then
	i = 0
	Me.Cls
	End If
	End Sub
查看键盘按键的AscII码的步骤
Option Explicit
	Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
	Static i As Integer
	Print CStr(KeyCode)
	i = i + 1
	If (i > 10) Then
	i = 0
	Me.Cls
	End If
	End Sub