找考题网-背景图
未分类题

在窗体上画一个文本框,然后编写如下事件过程: Private Sub Text1_KeyPress(KeyAscii As Integer) Dim char As String char=Chr(KeyAscii) KeyAscii=Asc(UCase(char)) TextText=String(6, KeyAscii) End Sub 程序运行后,如果在键盘上输入字母“a”,则文本框中显示的内容为______。
D.AAAAAAA

A.a
B.A
C.aaaaaaa

【参考答案】

D
解析:该事件过程中首先用Chr函数记录下输入的字符,然后用UCase函数将其转化为大写,再用Asc函数.记录下其码值。最后使用String函数将其重复6遍并输出到文本框中。当文本框中的文本内容发生变化的时候,会触发文本框的Change事件,而KeyPress事件是在Change事件之前触...

(↓↓↓ 点击‘点击查看答案’看完整答案 ↓↓↓)
热门试题