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

admin2016-06-30  30

问题 窗体上有两个名称分别为Text1、Text2的文本框。Text1的KeyUp事件过程如下:
    Private Sub Textl_KeyUp(KeyCode As Integer,Shift As Integer)
    Dim C As String
    C=UCase(Cllr(KeyCode))
    Text2.Text=Chr(Asc(C)+2)
    End Sub
    当向文本框Text1中输入小写字母a时,文本框Text2中显示的是(    )。

选项 A、A
B、a
C、c
D、C

答案C

解析 KeyDown和Keyup事件的Keycode参数返回的是“键”,即按字母“A”和“a”时得到的KeyCode的值是相同的,都是&H41。因此程序中对输入“a”时得到的KeyCode,经Chr函数转为字符后为“A”,经Ucase函数转换仍为“A”,所以变量c中的字符为“A”。Asc(c)将返回变量c中的第一个字符的AscII,加2后,再由Chr函数转为字符即为“A”后面的第2个字符,即“C”。所以答案应为选项c。
转载请注明原文地址:https://jikaoti.com/ti/N3J0FFFM
0

最新回复(0)