在名称为Form1的窗体上画一个文本框，名称为Text1，MultiLine属性为True，ScroUBars属性为2；两个命令按钮，名称分别为Cmdl和Omd2，标题分别为'读入数据'和'计算保存'，如图2-6所示。要求程序运行后，如果单击'读入数据'按钮，则读入in.txt文件中的100个整数，放入一个数组中（数组下界为1），同时在文本框中显示出来；如果单击'计算保存'按钮，则计算数组中大于或等于400并且小于800的所有数之和，并将结果在文本框Text1中显示出来，同时把结果存入考生文件夹的result.txt文件中（在prog.bas中的putdata过程可以把结果存入result.txt文件）。 图2-6 注意：文件必须存放在考生文件夹下，窗体文件名为sj5.frm，工程文件名为sj5.vbp，计算结果存入result.txt文件中，否则没有成绩。