窗体上有两个名称分别为Text1、Text2的文本框。Text1的KeyUp事件过程

问题单项选择题

窗体上有两个名称分别为Text1、Text2的文本框。Text1的KeyUp事件过程如下：

Private Sub Text1_KeyUp(KeyCode As Integer，Shift As Integer)

Dim c As String

c=UCase(Chr(KeyCode))

Text2.Text=Chr(Ase(c)+2)

End Sub

当向文本框Text1中输入小写字母a时，文本框Text2中显示的是（）。

A．A

B．a

C．C

D．c

答案

参考答案：C

解析：

KeyDown和KeyUp事件的KeyCode参数返回的是“键”，即按字母“A”和“a”时得到的Key Code的值是相同的，都是&H41。因此程序中对输入“a”时得到的KeyCodE，经Chr函数转为字符后为“A”，经UCase函数转换仍为“A”，所以变量c中的字符为“A”。Asc(c)将返回变量c中的第一个字符的ASCII，加2后，再由Chr函数转为字符，即为“A”后面的第2个字符，即“C”。所以答案应为选项C。