三、綜合應用
    在名稱為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。