根据一下资料，回答下列 6～7 题 2008年12月1日，由于受全球经济危机的影响，A建筑公司在美国的项目

d1，标题为“移动滚动条”。请编写适当的事件过程，使得在运行时，每单击命令按钮一次(假定单击次数少于10次)，滚动框向右移动20个刻度。运行时的窗体如下图所示。

注意：

程序中不得使用变量，事件过程中只能写一条语句：文件必须存放在考生文件夹中，工程文件名为execise52.vbp，窗体文件名为execise52.frm。

在名为Form1的窗体上建立一个二级下拉菜单(菜单项见下表)。

注意：

文件必须存放在考生文件夹中，工程文件名为CXeCise95.vbp，窗体文件名为 execiSe95.frm。

像文件pic1.bmp放到图片框中(如下图所示)。

注意：

文件必须存放在考生文件夹中，工程文件名为execise107.vbp，窗体文件名为 execise107.frm。

在考生文件夹下JIBEN文件夹中创建名为A2TNBQ的文件夹，并设置属性为隐藏。

2．在考生文件夹下QINZE文件夹中的HELP.BAS文件复制到同一文件夹中，文件名为 RHL.BAS。

3．将考生文件夹下PWELL文件夹中的BAW.EXEY文件建立名为KBAW的快捷方式，并存放在考生文件夹下。

4．将考生文件夹下RMEM文件夹中的PRACYL.XLS文件移动到考生文件夹中，并改名为RMICRO.XLS。

5．将考生文件夹下NAOM文件夹中的WINDOWS.BAK文件删除。

图所示。

要求程序运行后，如果单击“计算”按钮，则求出1～30之间所有可以被7整除的数的乘积并在文本框中显示出来，结果存入考生文件夹中的out117.txt文件中。

在考生的文件夹中有一个mode.bas标准模块，该模块中提供了保存文件的过程putdah，考生可以直接调用。

注意：

文件必须存放在考生文件夹中，窗体文件名为execisell7.frm，工程文件名为

execise117.Vbp。

大写显示(要求焦点在最右端)，如下图所示。

注意：

文件必须存放在考生文件夹中，窗体文件名为execise12.frm，工程文件名为 execise12.vbp。

下面出现的“考生文件夹”均为c:\wexam\25160001。

在考生文件夹中有工程文件sjt5.vbp及其窗体文件sjt5.frm，该程序是不完整的，请在有？号的地方填入正确内容，然后删除？及所有注释符(即'号)但不能修改其他部分。存盘时不得改变文件名和文件夹。

本题描述如下：

在名称为Form1的窗体上有一个文本框，名称为Text1，MuitiLine属性为True，ScrollBars属性为2，两个命令按钮，名称分别为Cmd1和Cmd2，标题分别为“读入数据”和“排序显示保存”，如图4-6所示。程序运行后，如果单击“读入数据”按钮，则读入“in.txt”文件中的100个整数，放入一个数组中(数组下界为1)：如果单击“排序显示保存”按钮，则对这100个整数按从小到大进行排序，把排序后的全部数据在文本框Text1中显示出来，然后存入考生文件夹中的文件“result.txt”中(在程序中的标准模块prog.bas过程可以把指定个数的数组元素存入result.txt文件)。

注意：文件必须存放在考生文件夹下，窗体文件名为sjt5.frm，工程文件名为sjt5.vbp，排序结果存入 result.txt文件，否则没有成绩。

将考生文件夹下TREE．BMP文件复制到考生文件夹下GREEN文件夹中。

(2)在考生文件夹下创建名为FILE的文件夹。

(3)将考生文件夹下OPEN文件夹中的文件SOUND．AVI移动到考生文件夹下GOOD文件夹中。

(4)将考生文件夹下ADD文件夹中的文件LOW．TXT文件删除。

(5)为考生文件夹下LIGHT文件夹中的文件MAY．BMP文件建立名为MAY的快捷方式，并存放在考生文件夹中。

15

请在考生文件夹下完成如下操作：

（1）在考生文件夹下建立“TEXT”文件夹；

（2）在考生文件夹下搜索文件名以“f”开头的、扩展名为“doc”的文件，并把它移动到“TEXT”文件夹中；

（3）将“TEXT”文件夹复制到“work”文件夹中，并设置“TEXT”文件夹为隐藏属性（仅将更改应用于该文件夹）。

程序运行后，单击“计算”命令按钮，通过在对话框输入整数10，放入整型变量s中，然后计算s!(提示：运算结果应放入Long型变量中)，在文本框中显示结果，并把结果存入文件output.txt中(在考生文件夹中有一个标准模块 mode.bas，该模块中提供了保存文件的过程putdata，考生可以直接调用)。

注意：

文件必须存放在考生文件夹中，窗体文件名为execise54.frm，工程文件名为 exeeise54.vbp。