在窗体上添加文本框Text1，然后编写下列程序： Private Sub Form

问题单项选择题

在窗体上添加文本框Text1，然后编写下列程序： Private Sub Form_Load()Text1.Text=" " End Sub Private Sub Text1_KeyPress(KeyAscii As Integer)Char=Chr(KeyAscii+1)KeyAscii=Asc(Ucase(Char)) End Sub Private Sub Command1_Click()Print Text1.Text End Sub 程序运行后，在文本框中依次输入1、2、3、a、b、c，单击命令按钮，则窗体上显示的内容是

A．23BCD

B．ABC

C．!@#ABC

D．123abc

答案

参考答案：A

解析：

[分析]：在向文本框中依次输入1、2、3、a、 b、c的同时，Text1_KeyPress过程分别接收到的是KeyAscii(各字符的ASCII码)，Chr函数将加过1的ASCII码转换成字符，UCase函数将字符转换成大写字符，数字保持不变，Asc函数又将字符转换成ASCII码，最后出现选项A的字符。