问题
单项选择题
窗体上有两个名称分别为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(Asc(c)+2)
End Sub
当向文本框Text1中输入小写字母a时，文本框Text2中显示的是
A．A
B．a
C．C
D．c
答案
参考答案：C
解析： Chr把A键扫描码KeyCode转换成字母A，UCase把字母转换成大写还是A，Asc将A转换成ASCII码值65，把ASCII码加2后再通过Chr转换成字母C。