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

admin2010-03-30  28

问题 在窗体上画两个文本框,其名称分别为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=Text1.Text+Chr(KeyCode-4)
   End Sub
   程序运行后,如果在Text2文本框中输入“eFghi”,则Text1文本框中的内容为【  】。

选项

答案ABCDE

解析 当用户在Text2中输入字符的时候,会触发Text2 KeyDown事件。该事件的处理代码使得Text1的内容为在原内容的基础上追加一个字符,追加的字符的ASCII值比输入的小4。所以当输入efghi的时候,输出为ABCDE。注意不是abode,因为KeyCode取的是键码,而不是ASCII:码,小写字符的键码等于对应大写字符的ASCII码。
转载请注明原文地址:https://kaotiyun.com/show/Jsmp777K
0

最新回复(0)