Question

VB中如何让运行结果这样显示？？要程序……

ASCII：65，字符：A
ASCII：97，字符：a
ASCII：66，字符：B
ASCII：98，字符：b
新手学习，望前辈们赐教啊！~~
谢谢各位侠士！可能是我没表述清楚，题目是这样的……
从键盘上输入字符时，在窗体上显示出所键入的字符和该字符的ASCII码值。如下图所示：
ASCII：65，字符：A
ASCII：97，字符：a
ASCII：66，字符：B
ASCII：98，字符：b
而不是直接运行，点命令按钮就直接出来！应该是通过Key Press事件来触发的！
看到各位给的都是-Click事件！请各位前辈指教！……追加20分！

Answer 1

Private Sub Command1_Click()
For i = 65 To 90
Print "ASCII:" & i & "，字符：" & Chr(i)
Print "ASCII:" & i + 32 & "，字符：" & Chr(i + 32)
Next i
End Sub

按照你的补充，应该用下面代码：
Private Sub Form_KeyPress(KeyAscii As Integer)
Print "ASCII:" & KeyAscii & ",字符：" & Chr(KeyAscii)
End Sub

Answer 2

Private Sub Command1_Click()
Print "ASCII:" & asc("A") & "，字符：" & Chr(65)
Print "ASCII:" & asc("a") & "，字符：" & Chr(97)
Print "ASCII:" & asc("B") & "，字符：" & Chr(66)
Print "ASCII:" & asc("b") & "，字符：" & Chr(98)
End Sub

Answer 3

Private Sub Command1_Click()
Dim i As Integer
i = 65
Do While (i <= 66)
Print "ASCII:" & i & "，字符：" & Chr(i)
Print "ASCII:" & i + 32 & "，字符：" & Chr(i + 32)
i = i + 1
Loop
End Sub