[单项选择题] 把窗体的KeyPreview属性设置为True,然后编写如下事件过程:
Private Sub Form_KeyPress(KeyAscii As Integer)
Dim Ch As String
Ch=Chr(KeyAscii)
KeyAscii=Asc(UCase(Ch))
Print Chr(KeyAscii+2)
End Sub
程序运行后,按键盘上的A键,则在窗体上显示的内容是______。
A.A
B.B
C.C
D.D
[单项选择题] 把窗体的KeyPreview属性设置为True,然后编写如下事件过程:
Private Sub Form_KeyPress(KeyAscii As Integer)
Dim Ch As String
Ch=Chr(KeyAscii)
KeyAscii=Asc(UCase(Ch))
Print Chr(KeyAscii+2)
End Sub
程序运行后,按键盘上的A键,则在窗体上显示的内容是______。
A.A
B.B
C.C
D.D
C解析:[分析]: KeyPress事件用来识别按键的ASCII码。参数KeyAscii是一个预定义的变量,执行KeyPress事件过程时,KeyAscii是所按键的ASCII码。函数Chr(x)是把x的值转换为相应的ASCII字符,函数Asc(x)是返回字符串x的首个字母的字符代码,函数UCase(x)返回大写的字符串X。当按键盘上的A键时,KeyPress值为97,Chr(97)的返回侑为“a”,Asc(UCase("a"))返回值为“65”Chr(65+2)的返回值为“C”。
VIP截止日期:2024-12-31 03:54:39
←请使用支付宝扫码支付VIP截止日期:2024-12-31 03:54:39
←请使用微信扫码支付