窗体上有两个名称分别为Text1、Text2的文本框。Text1的KeyUp事件过程如下: Private Sub Text1_KeyUp(KeyCode As Integer,Shift As Integer) Dim c As String c

admin2017-06-21  20

问题 窗体上有两个名称分别为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

解析 本题考查的考点是有关字符转换函数的。UCase函数的功能为强制转成大写字母;Chr函数的功能是把整数按照ASCII码转换成字母;Asc函数的功能是把字母转换成对应的ASCII码。本题中变量c的值是大写字母“A”,最终结果是大写字母“C”。
转载请注明原文地址:https://jikaoti.com/ti/TBy0FFFM
0

最新回复(0)