[填空题] 在窗体上画两个文本框，其名称分别为Text1和Text2，然后编写如下事件过程： Private Sub Form_Load()ShowText1

[填空题] 在窗体上画两个文本框，其名称分别为Text1和Text2，然后编写如下事件过程：

Private Sub Form_Load()

Show

Text1.Text=""

Text2.Text=""

Text2.SetFocus

End Sub

Private Sub Text2 KeyDown(KeyCode As Integer,Shift As Integer)

Text1.Text=Text.Text+Chr(KeyCode-4)

End Sub

程序运行后，如果在Text2文本框中输入“efghi”，则Text1文本框中的内容为 【11】 。

ABCDE

[评析] 当用户在Text2中输入字符的时候，会触发Text2_KeyDown事件。该事件的处理代码使得Text1的内容为在原内容的基础上追加一个字符。追加的字符的ASCII值比输入的小4。所以当输入efghi的时候，输出为ABCDE。注意不是abcde，因为KeyCode取的是键码，而不是ASCII码，小写字符的键码等于对应大写字符的ASCII码。