VB中 在键盘上输入一个小写字母,要求在窗体上显示其ASCII码值 该怎么编程

如题所述

在窗体上建立一个command1,和一个Text1,其中Text1用于输入字母。
代码如下:
Option Explicit
Dim a% ‘定义一变量,用于存放字母的ascii
Private Sub Command1_Click()
Print a ‘打印字母的Ascii
End Sub

Private Sub Text1_KeyPress(KeyAscii As Integer)
a = KeyAscii '记录输入的字母的Ascii
End Sub
温馨提示:答案为网友推荐,仅供参考
第1个回答  2009-10-08
用2个textbox控件
private sub text1_change(...)
text2.text=str(chr(text1.text))
end sub