[单项选择题] 在窗体上画一个文本框,然后编写如下事件过程。当该程序运行后,如果在键盘上输入字母“a”,则文本框中显示的内容为 ______。 Private Sub Text1_KeyPress<KeyAscii As Integer) Dim char as String char=Chr(KeyAscii) Text1.Text=String(5,KeyAscii) End Sub
A.aaaaa
B.AAAAA
C.aaaaaa
D.AAAAAA
[单项选择题] 在窗体上画一个文本框,然后编写如下事件过程。当该程序运行后,如果在键盘上输入字母“a”,则文本框中显示的内容为 ______。 Private Sub Text1_KeyPress<KeyAscii As Integer) Dim char as String char=Chr(KeyAscii) Text1.Text=String(5,KeyAscii) End Sub
A.aaaaa
B.AAAAA
C.aaaaaa
D.AAAAAA
D
在程序段用到了4个函数,在按了键盘上的某个键(在这里是字母键a)后,Chr函数将得到的键的ASCII码值(101)转换成该ASCII码值对应的字符(a),然后利用Ucase函数将该字符转换成大写字母(A),将该大写字母的ASCII码值(利用函数Asc())赋给 KeyAscii,最后利用String函数的5个ASCII码值等于KeyAscii的字符(即5个A)赋给文本框Text1,此时文本框中将显示5个A,又因为KeyPress事件本身会在文本框中显示输入一个ASCII码值为KeyAscii的字符(A),因此最后在文本框中将显示6个大写字母A。
VIP截止日期:2025-01-03 01:54:37
←请使用支付宝扫码支付VIP截止日期:2025-01-03 01:54:37
←请使用微信扫码支付