在窗体上有一个文本框，其名称为Text1，编写下列事件过程： Pri

问题单项选择题

在窗体上有一个文本框，其名称为Text1，编写下列事件过程： Private Sub Text1_KeyPress(KeyAscii As Integer) Dim str As String str=Chr(KeyAscii) KeyAscii=Asc(UCase(str)) Text1.Text=Stririg(2,KeyAscii) End Sub 程序运行后，如果在键盘上输入字母“a”，则在文本框Text3中显示的内容为( )。

A．aaa

B．AAA

C．AA

D．aa

答案

参考答案：B

解析： UCase(str)将str转成大写的字符串；String(n,character)返回n个重复的字符，如果character是ASCII码，则返回其对应的字符。程序运行过程为：首先输入字母“a”，并通过“str=Chr(KeyAscii)”语句将a的ASCII值转换成字符串；然后通过“KeyAscii=Asc(UCase(str))”求得大写A的ASCII值，并显示在文本框中；最后通过“Text1.Text=String(2,KeyAscii)”语句为文本框输入了两个字母“A”，所以最后在文本框中显示出3个大写字母“A”。