[单项选择题] 把窗体的KeyPreview属性设置为True,然后编写如下事件过程:
Private Sub Form_KeyPress(KeyAscii As Integer)
Dim ch As String
ch=Chr(KeyAscii)
KeyAscii=Ase(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=Ase(UCase(ch))
Print Chr(KeyAscii+2)
End Sub
程序运行后,按键盘上的“A”键,则在窗体上显示的内容是( )
A.A
B.B
C.C
D.D
C
本题考查了3个系统函数:Chr(),Asc(),UCase()。它们的功能分别是将ASCII码值转换为字符;将字符转化为Ascii码值;将字符转化为大写字符串。KeyPreview属性返回或设置一个值,以决定是否在控件的键盘事件之前激活窗体的键盘事件。键盘事件有KeyDown、KeyUp和KeyPress,主要应用于Form对象。本题的程序执行时,当按下“A”时,则“A”的Ascii码值传给函数体,并转换为字符赋给变量ch,再将ch(即“A”)的Ascii值赋值给KeyAscii,最后将KeyAscii值加2并转化为字符打印输出,即结果为字母“C”。
VIP截止日期:2025-01-03 01:28:52
←请使用支付宝扫码支付VIP截止日期:2025-01-03 01:28:52
←请使用微信扫码支付