Question

vb中的text1_keypress问题

Private Sub text1_keypress(keyascii As Integer)
Dim str1 As String
str1 = Chr(keyascii)
keyascii = Asc(str1)
Text1.Text = "AAA"
Print Text1.Text
End Sub

焦点在text1，按下键盘上的B键后，为什么text1中显示的结果是"bAAA"? b是哪来的？

Answer 1

你也说了焦点在text1，既然焦点在text1，那么你按下“B”后，他当然会输出一个“B”
如果你换成“F1”或“Enter”什么的它就不会出现了啊。
文本框本来就是用来输入字符的，“B”就是一个字符，它肯定会输出来啦！

Answer 2

text1_keypress 事件是在 Text1_Change 事件之前执行的。键盘输入的数据，是在执行完 text1_keypress事件之后才显示到 Text1.text里面的。

Answer 3

发送事件与显示字符本是两回事，并不因为处理了事件它就不显示出来了。不过要阻止进入文本框也可以，只要把keyascii 赋 0就可以了。