Question

有一道vb操作题，请高手赐教！

设计程序，从键盘输入字符时，在窗体上立即显示所键入的字符和该字符的ASCII码，双击窗体时清除窗体上显示的内容。
格式如下：
输入字符：A ASCII码为：65
输入字符：B ASCII码为：66
输入字符：C ASCII码为：67
利用窗体的keypress事件

Answer 1

在窗体上放置一个label控件，然后在编辑区中粘贴如下代码：

Private Sub Form_DblClick()
Label1.Caption = ""
End Sub

Private Sub Form_KeyPress(KeyAscii As Integer)
Label1.Caption = "字符为:" & Chr(KeyAscii) & Space(5) & "对应ASCII码:" & CStr(KeyAscii)
End Sub

Answer 2

一个空白窗体就行了. 代码如下:

Private Sub Form_DblClick()
Me.Cls
End Sub

Private Sub Form_KeyPress(KeyAscii As Integer)
Print Chr(KeyAscii) & " ASCII码为：" & KeyAscii
End Sub

Private Sub Form_Load()
Me.KeyPreview = True
End Sub