窗体上有Text1、Text2两个文本框,并有以下过程: Private Sub Text1_KeyDown(KeyCode As Integer, Shift As Integer) Dim ch As String ch = LCase

admin2015-09-23  26

问题 窗体上有Text1、Text2两个文本框,并有以下过程:
Private Sub Text1_KeyDown(KeyCode As Integer, Shift As Integer)
    Dim ch As String
    ch = LCase(Chr(KeyCode))
    Text2.Text = Chr(Asc(ch) + 2)
End Sub
程序运行时,在Text1中输入了字母"D",则Text2中显示的是(    )。

选项 A、d
B、D
C、f
D、F

答案C

解析 KeyDown事件返回的是键盘的直接状态,KeyCode参数是按键的实际的ASCII码。该码以"键"为准,而不是以"字符"为准,也就是说大写字母与小写字母使用同一个键,它们的KeyCode相同(使用大写字母的ASCII码)。本题中首先在Text1文本框中输入大写字母"D",即程序的KeyCode参数的值为大写字母"D"的ASCII码值,该值为68。通过转换函数Chr将ASCII码转换为字符"D",再通过转换函数LCase将大写"D"转换为小写"d",最后使用Asc函数获取小写"d"的ASCII码,并将其加2,然后转换为字母"f",所以在Text2文本框中显示的为字符"f"。故选项C正确。
转载请注明原文地址:https://kaotiyun.com/show/OQLp777K
0

最新回复(0)