[填空题] 在窗体上画两个文本框,其名称分别为Text1和Text2,然后编写如下事件过程: Private Sub Form_Load() Show Textl.Text=""

20 查阅

[填空题] 在窗体上画两个文本框,其名称分别为Text1和Text2,然后编写如下事件过程: Private Sub Form_Load() Show Textl.Text="" Text2.Text="" Text2.SetFocus End Sub Private Sub Text2_KeyDown(KeyCode As Integer,Shift As Integer) Textl.Text=Textl.Text+Chr(KeyCode-4) End Sub 程序运行后,如果在Text2文本框中输入“efghi”,则Text1文本框中的内容为 【11】

参考答案:

ABCDE

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

计算机考试