[填空题] 在窗体上画—个文本框，名称为Text1，然后编写如下程序： Private Sub Form_Load() Open"d:empdat.txt"For Output

参考答案:

[14]"END"

[15]Fext1.Text或Text1[知识点] KeyPress事件[评析] UCase(字符串)：将字符串中的字符转换为大写。在窗体的Load事件中以写的方式打开dat.txt，并给文本框赋初值，初值为空，题目要求在文本框中输入字符，每次按回车键都把当前文本框中的内容写入文件dat.txt中，当按下键盘上的某个键时，将发生KeyPress事件。KeyPress事件用来识别按键的ASCII码。如果所按键的ASCII码为13，即当按下回车键时，UCase(字符串)(即将文本框的文本转换为大写后的内容)等于什么时，将文本中的内容不写入文件，关闭dat.txt文件，根据题目描述：如果输入"END"时，则不写入文件。所以当转换后的文本框的内容为"END"时，关闭dat.txt文件，因此第14个空应填"END"。如果文本框中输入的字符不是"END"，则把文本框的内容写入到dat.txt文件中，所以写入的内容为文本框Text1的文本内容，因此第15个空应填Text1.Text。