三、综合应用
    在名称为Form1的窗体上建立一个文本框（名称为Text1,MultiLine属性为True，ScrollBars属性为2）和两个命令按钮（名称分别为Command1和Command2，标题分别为“读入数据”和“计算保存”），如图所示。要求程序运行后，如果单击“读入数据”按钮，则读入in003.txt文件中的100个整数，放入一个数组中（数组下界为1），同时在文本框中显示出来；如果单击“计算保存”按钮，则计算数组中大于或等于400并且小于800的所有数之和，把求和结果在文本框Text1中显示出来，同时把结果存入考生文件夹中的文件out003.txt中。补充窗体模块中？处的程序。（在mode003.bas中的putdata过程可以把结果存入out003.txt文件）
    注意：
    文件必须存放在考生文件夹下，窗体文件名为djks003.frm，工程文件名为djks003.vbp，计算结果存入out003.txt，否则没有成绩。
    程序运行的窗体界面如图所示。

【答案】
    打开考生文件夹下的djks003.vbp文件。单击工具箱，在窗体上画出文本框Text1与两个控制按钮，其中Text1的MultiLine属性设置为True,ScrollBars属性设置为2；按钮分别命名为Command1和Command2,Caption属性分别为“读入数据”和“计算保存”。
双击Command1，在第一个？处填：input
双击Command2，在第二个？处填：i(j)>=400 And i(j)<800
然后运行程序。调试成功后，把结果保存到考生文件夹的in003.txt文件中。之后，以原来的文件名保存工程文件。
【解析】
    其中文本框的MultiLine属性确定文本框是否可以多行显示，ScrollBars设置为2，可以生成一个垂直滚动条。程序代码中的第一个？处需要使用Open语句读入in003.txt中的数值，故本处填input，表示读入数据。第二个？处判断数组中大于或等于400并且小于800的所有数，如果符合条件，则把该数以相加的方式赋给temp。故本处填：i(j)>=400 And i(j)<800。