![[填空题] 在窗体上画一个命令按钮和一个文本框，其名称分别为Command1和Text1，然后编写如下代码： Dim SaveAll As String Private Sub Command1_](http://www.mshxw.com/aiimages/31/258577.png "[填空题] 在窗体上画一个命令按钮和一个文本框，其名称分别为Command1和Text1，然后编写如下代码： Dim SaveAll As String Private Sub Command1_")
[填空题] 在窗体上画一个命令按钮和一个文本框，其名称分别为Command1和Text1，然后编写如下代码：
Dim SaveAll As String
Private Sub Command1_Click()
Text1.Text=Left(UCase(SaveAll),4)
End Sub
Private Sub Text1_KeyPress(KeyAscii As Integer)
SaveAll=SaveAll+Chr(KeyAscii)
End Sub
程序运行后，在文本框中输入abcdefg，单击命令按钮，则文本框中显示的内容是______。
参考答案：
"ABCD问题解析:
本题考查的知识点是KeyPress事件的KeyAscii参数，KeyrAscii参数代表的是键盘按下时字符所对应的ASCII码，因此在文本框中输入abcdefg之后变量SaveAll的值为"abcdefg"，UCase()函数把字符串变量SaveAll中的字母全部变为大写形式，Left()函数取出字符串SaveAll中前4个字符，所以本题的正确答案为”ABCD”。
