问答题
综合应用题
在考生文件夹中有工程文件sj5．vbp及其窗体文件sj5．frm，该程序是不完整的。在名称为Form1的窗体上有一个文本框，名称为Text1、MultiLine属性为True、ScrollBars属性为2；两个命令按钮，名称分别为Command1和Command2、标题分别为“读入”和“排列保存”，运行界面如图5-6所示。要求程序运行后，如果单击“读入”按钮，则从in．txt文件中读入50个整数，放人一个数组中(数组下界为1)；如果单击“排列保存”按钮，则对这50个数从大到小进行排序，把排序后的全部数据在文本框Text1中显示出来，然后存人考生文件夹中的result．txt文件中(在程序中的标准模块mode5．has过程可以把指定个数的数组元素存入re-sult．txt文件)。
【正确答案】在本题中涉及文件的操作，用Write#或Input#语句读取数据，对文件操作完后一定要关闭文件。根据题意，将一个文本框控件和两个命令按钮添加到窗体中，根据题意的要求设置属性，即文本框的名称为Text1、MultiLine属性为true、ScrollBars属性为2，两个命令按钮的控件的Caption属性分别为“读取”和“排列保存”，名称为Command1和Command2。在“工程”窗口中单击右键，在弹出的快捷菜单中选择“添加”→“添加模块”，然后在弹出对话框的“现存”选项卡中选择“mode5．bas”，单击“确定”按钮即添加成功。模块的代码如下：
分析程序可知，程序在读取的同时就进行了排序，一旦读取的数比当前数大，则将两数位置交换，继续比较后面的数。补充后的具体代码如下：
分析程序可知，程序在读取的同时就进行了排序，一旦读取的数比当前数大，则将两数位置交换，继续比较后面的数。补充后的具体代码如下：
【答案解析】