[填空题] 在窗体上画 1 个命令按钮和 1 个文本框，其名称分别为 Command1 和 Text1，然后编 写如下代码：Dim SaveAll As StringPrivate Sub Comma

[填空题] 在窗体上画 1 个命令按钮和 1 个文本框，其名称分别为 Command1 和 Text1，然后编 写如下代码：Dim SaveAll As StringPrivate 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，单击命令按钮，则文本框中显示的内容是 _________。（ 10 ）在窗 体上画 1 个命令按钮 和 1 个通用对话框， 其名称分别 为 Command1 和CommonDialog1，然后编写如下事件过程：Private Sub Command1_Click()CommonDialog1. _________ = "打开文件"" CommonDialog1.Filter = "All Files(*.*)|*.*" CommonDialog1.InitDir = "C:" CommonDialog1.ShowOpenEnd Sub 该程序的功能是，程序运行后，单击命令按钮，将显示"打开"文件对话框，其标题是" 打开文件"，在"文件类型"栏内显示"All Files(*.*)"，并显示C盘根目录下的所有文件， 请填空。

参考答案：

ABCD

问题解析:

每在 Text1 中输入一个字符，都将触发一次 KeyPress 事件，该事件的作用是将当前所输入的字符连 接到字符串 SaveAll 的后面。故字符输入结束后，SaveAll 中的内容为”abcdefg”，Ucase 函数是将字符串所 有的字母都转换成大写字符，执行 Ucase(SaveAll)的结果为”ABCDEFG”，Left(S,4)是取字符串 S 的前四个 字符，作为一个字符串返回。故 Left(Ucase(SaveAll),4)=Left(”ABCDEFG”,4)=”ABCD”。本空填：ABCD。