16.单击工具栏中的“运行”按钮运行该表单,调试通过后关闭表单设计窗口; 17.单击“连编”按钮,在“连编选项”对话框中选中“连编可执行文件”; 18.单击“确定”按钮,在“另存为”对话框的应用程序名处输入“PROJ1”; 19.单击“保存”按钮,完成连编。
操作步骤:
1.使用MODI COMM PROG1 命令进入编程窗口。 参考程序1:
SELECT 科目, CNT(*) AS 人数, AVG(分数) AS 平均成绩; FROM CJ GROUP BY 科目 ORDER BY 科目;
INTO TABLE KSCJ.DBF
ALTER TABLE KSCJ ALTER 科目 C(30) ALTER 人数 N(10) ALTER 平均成绩 N(16,2) CANCEL
参考程序2:
CREATE TABLE KSCJ(科目 C(30), 人数 N(10) ,平均成绩 N(16,2)) SELECT 0 USE CJ
INDEX ON 科目 TAG 科目 UNIQ COPY TO CCJ CLOSE INDEX SELECT KSCJ
APPEND FROM CCJ SCAN KM=KSCJ.科目 SELECT CJ
COUNT ALL FOR CJ.科目=KM TO RS
AVERAGE ALL 分数 FOR CJ.科目=KM TO PJF SELECT KSCJ
REPLACE 人数 WITH RS ,平均成绩 WITH PJF
ENDSCAN CLOSE ALL
2.使用CREATE MENU MENU1命令创建菜单,建立菜单项“计算”和“退出(\\ 第 6 页 共 28 页 模拟题三: 参考答案: 为确保考试数据保存在考生文件夹下,建议启动VFP后,首先执行: SET DEFAULT TO 考生文件夹 1.数据表的排序: USE AXSDA SORT TO APX ON 籍贯/D,学号 FIELDS 学号,姓名,籍贯 2.数据表的复制、删除记录: COPY TO AXS FIELDS 姓名,出生日期 USE AXS DELETE FOR 2012-YEAR(出生日期)>30 PACK 3.数据表的复制、添加字段、填写值: USE AXSCJ COPY TO ACJ USE ACJ ALTER TABLE ACJ ADD 总评 C(6) &&或用MODI STRU命令添加 REPLACE ALL 总评 WITH IIF((语文+数学+英语)/3>=90,\合格\不合格\ 第 7 页 共 28 页 操作步骤如下: 1.选择“文件/新建”命令,新建一个项目,项目文件名为PROJ1; 2.单击“代码”列表,并选中“程序”项,单击“添加”按钮,并选中考生文件夹下MAIN.PRG,将该程序添加到项目中; 3.单击“文档”列表,并选中“表单”项,单击“新建”按钮,新建一个新表单; 4.在表单属性窗口中,Caption设置为“圆演示”,Height设置为100,Width设置为400; 5.选择形状控件,在表单的适当位置拖放,在该控件的属性窗口中,将Curvature属性设置为99 ,将Height属性设置为40,将Width属性设置为40,BackColor设为0,255,0; 6.选择线条控件,在表单的适当位置拖放,在该控件的属性窗口中,将Height设置为0,将Width 为400; 7.选择时钟控件,在表单的适当位置拖放,在该控件的属性窗口中,将Interval设置为1000,其Click事件参考代码如下: THISFORM.SHAPE1.LEFT=THISFORM.SHAPE1.LEFT+5 (此处值可以改变) 8.选择命令按钮控件,在表单的适当位置拖放,在该控件的属性窗口中,将Caption设置为“关闭”,其Click事件参考代码如下: THISFORM.RELEASE 9.选择“文件/保存”命令,在弹出的对话框中将其保存到考生文件夹中,文件名为SCRE1; 10.单击工具栏中的“运行”按钮运行该表单,调试通过后关闭表单设计窗口; 11.单击“连编”按钮,在“连编选项”对话框中选中“连编可执行文件”; 12.单击“确定”按钮,在“另存为”对话框的应用程序名处输入“PROJ1”; 13.单击“保存”按钮,完成连编。 第 8 页 共 28 页 操作步骤: 1.使用MODI COMM PROG1 命令进入编程窗口。 参考程序: SET TALK OFF USE CCZF COPY TO NCZF USE NCZF SCAN ZFC=ZM ASCM=ASC(ZM) FOR I=1 TO 7 ZFC=ZFC+CHR(ASCM+I) NEXT I REPLACE ZF WITH ZFC ENDSCAN SET TALK ON 2.使用CREATE MENU MENU1命令创建菜单,建立菜单项“计算”和“退出”。 “计算”项中结果选“命令”,选项中填写“DO PROG1.PRG”或“DO PROG1”; “退出”项中结果选“命令”,选项中填写“QUIT”或“RETURN”或“CANCEL”; 生成菜单程序,运行菜单并执行“计算”项。 第 9 页 共 28 页 模拟题四: 参考答案: 为确保考试数据保存在考生文件夹下,建议启动VFP后,首先执行: SET DEFAULT TO 考生文件夹 1.数据表的复制、填写值: USE ASCR COPY TO ASFZ USE ASFZ REPL ALL 总评 WITH 笔试成绩*0.4+上机成绩*0.6 2.复合索引的建立: USE ASCR INDEX ON 准考证号 TAG FJG OF SY.CDX CLOSE INDEX 3.统计与内存变量操作: USE ASFZ COUNT FOR 笔试成绩<70 TO TJ &&或用CALCULATE CNT() TO TJ FOR 笔试成绩<70 SAVE TO MTJ 第 10 页 共 28 页