在名为 Form1 的窗体上建立一个名称为 Txt1 的文本框，其 MultiLine 属性为 True， ScrollBars 属性为 2；3 个名称分别为 Cmd1、Cmd2 和 Cmd3 的命令按钮，它们的标题分 别为“读数”、“计算”和“保存”。 

要求程序运行后，如果单击“读数”按钮，则读入 dr2.dat 文件中的 100 个整数，放 入一个数组中（数组下界为 1），同时在文件框中显示出来；如果单击“计算”按钮，则 计算小于或等于 300 的所有数之和，并把结果在文本框 Txt1 中显示出来，如果单击“保 存”按钮，把该结果存入考生文件夹中的文件 dw1.dat 中（在考生文件夹下有标准模块 model.bas，其中的 writedata 过程可以把结果存入指定的文件，考生可以把该模块文件添 加到自己的工程中，直接调用此过程），如图 52-5 所示。

注意：文件必须放在考生文件夹中，窗体文件名为 vbsj5.frm，工程文件名为 vbsj5.vbp， 计算结果存入 dw1.dat 文件，否则没有成绩。