如何转换输入的字符？？？

Question

在VB的TEXTBOX中输入的是字符，比如“E”，会被转换成ASCII码保存在变量中。我想，如何能使输入的字符转换成原来的表示的“E”，即14？
如何把TEXTBOX中输入的EE，转换成“EEh”？小弟初学VB，请各位高手指点！

Answer 1

能不能说清楚些？首先如何把输入的字符转换成它所表示的BCD码？

Answer 2

可以用asc,chr对字符进行ascii和字符转换
1，Dim MyNumber
MyNumber = Asc("A")   ' Returns 65.
MyNumber = Asc("a")   ' Returns 97.
MyNumber = Asc("Apple")   ' Returns 65.
2。
Dim MyChar
MyChar = Chr(65)   ' Returns A.
MyChar = Chr(97)   ' Returns a.
MyChar = Chr(62)   ' Returns >.
MyChar = Chr(37)   ' Returns %.

Answer 3

谢谢火花！但这样转换出来是它的ASC码。
如何把输入的“A”变成0Ah，也就是“10”。如果按上面的转换成ASC码，对于1、2……，9和A，B，……F的转换公式是不一样的。
还要进行判断，太麻烦了。有没有更好的方法？如，输入：AA 则存入内存的是： 65 65
我想输入：AA 使之存入内存的是：AA  （只占一个字节）

Answer 4

不太明白你的意思，是否是
Text1.text = "AA"
CByte("&H" + Text1.text)CByte 能将一个表达式转换成字节型

Answer 5

d=asc(text1.text)-48
if d>10 then d=d-7

Answer 6

to tanyx:你的方法只能转一个字符？如我输入“EE”，
返回值是“14”
没办法返回“1414”。