10.选择“文件/保存”命令，在弹出的对话框中将其保存到考生文件夹中，文件名为SCRE1； 11.单击工具栏中的“运行”按钮运行该表单，调试通过后关闭表单设计窗口； 12.单击“连编”按钮，在“连编选项”对话框中选中“连编可执行文件”； 13.单击“确定”按钮，在“另存为”对话框的应用程序名处输入“PROJ1”； 14.单击“保存”按钮，完成连编。
操作步骤：
1.使用MODI COMM PROG1命令进入编程窗口。 参考程序： SET TALK OFF USE NTJ COPY TO NEW USE NEW
DIME A(60)
STORE 1 TO A(1),A(2) FOR I=3 TO 60
A(I)=A(I-1)+A(I-2) IF I>=11
APPEND BLANK REPL 数值 WITH A(I)
ENDIF NEXT
USE
RETURN
SET TALK ON 2.使用CREATE MENU MENU1命令创建菜单，建立菜单项“计算(\\ 第 21 页 共 28 页 模拟题八： 参考答案： 为确保考试数据保存在考生文件夹下，建议启动VFP后，首先执行： SET DEFAULT TO 考生文件夹 1.数据表结构的复制： USE ASPXX COPY TO ASP USE ASP MODI STRU &&在表设计器中修改字段宽度，插入新字段 &&或用ALTER TABLE ASP ALTER 品名 C(14)修改字段 2.数据表的排序： USE ASPXX SORT TO AST ON 单位编号/D,品名 3.求和与内存变量操作： USE ASPXX SUM 数量 TO ZH FOR 品名=\优冷\ &&或用CALCULATE SUM(数量) TO ZH FOR 品名=\优冷\ SAVE TO MZH close all 第 22 页 共 28 页 操作步骤如下： 1.选择“文件/新建”命令，新建一个项目，项目文件名为PROJ1； 2.单击“代码”列表，并选中“程序”项，单击“添加”按钮，并选中考生文件夹下MAIN.PRG，将该程序添加到项目中； 3.单击“文档”列表，并选中“表单”项，单击“新建”按钮，新建一个表单； 4.在表单属性窗口中，Caption设置为“成绩查询”，Height设置为125，Width设置为255； 5.在表单上右击，选择“数据环境”，将B01.DBF表添加到数据环境中； 6.在控件窗口中选择标签控件，在表单的适当位置拖放形成Label1，在其属性窗口中，将Caption设置为“姓名”、FontName 设置为\黑体\、FontSize设置为11、ForeColor设置为0,0,255； 7.在控件窗口中选择标签控件，在表单的适当位置拖放形成Label2，在其属性窗口中，将Caption设置为“成绩”、FontName 设置为\黑体\、FontSize设置为11、ForeColor设置为0,0,255； 8.在控件窗口中选择下拉列表框控件，在表单的适当位置拖放形成Combo1，在其属性窗口中，将RowSourceType 设置为 6，RowSource设置为B01.姓名，Style设置为2，其Click事件参考代码如下： THISFORM.TEXT1.VALUE=成绩 9.在控件窗口中选择命令按钮控件，在表单的适当位置拖放，在其属性窗口中，将Caption设置为“关闭”，其Click事件参考代码如下： RELEASE THISFORM 10.选择“文件/保存”命令，在弹出的对话框中将其保存到考生文件夹中，文件名为SCRE1； 11.单击工具栏中的“运行”按钮运行该表单，调试通过后关闭表单设计窗口； 12.单击“连编”按钮，在“连编选项”对话框中选中“连编可执行文件”； 13.单击“确定”按钮，在“另存为”对话框的应用程序名处输入“PROJ1”； 14.单击“保存”按钮，完成连编。 第 23 页 共 28 页 操作步骤： 1.使用MODI COMM PROG1 命令进入编程窗口。 参考程序1： SET TALK OFF USE TJ COPY TO JS USE JS SCAN S=0 FOR I=1 TO 数值 S=S+I-SQRT(I) NEXT I REPLACE 运算结果 WITH S ENDSCAN CLOSE ALL SET TALK ON 参考程序2： SET TALK OFF USE TJ COPY TO JS USE JS SCAN S1=0 S2=0 FOR I=1 TO 数值 S1=S1+I S2=S2+SQRT(I) NEXT I REPLACE 运算结果 WITH S1-S2 ENDSCAN CLOSE ALL SET TALK ON 2.使用CREATE MENU MENU1命令创建菜单，建立菜单项“文件”，再建立子菜单项“运算”、 第 24 页 共 28 页 “\\-”和“退出(\\ “运算”项中结果选“命令”，选项中填写“DO PROG1.PRG”或“DO PROG1”； “退出(\\ 第 25 页 共 28 页