操作步骤如下:
1.选择“文件/新建”命令,新建一个项目,项目文件名为PROJ1;
2.单击“代码”列表,并选中“程序”项,单击“添加”按钮,并选中考生文件夹下MAIN.PRG,将该程序添加到项目中;
3.单击“文档”列表,并选中“表单”项,单击“新建”按钮,新建一个新表单; 4.在表单属性窗口中,Caption设置为“选修课程”,Height设置为200,Width设置为400;
5.在控件窗口中选择标签控件,在表单上添加控件Label1,在属性窗口中,将Caption设置为“你的选修课程是”;
6.在控件窗口中选择复选框控件,在表单上添加控件Check1,在其属性窗口中,将其Caption属性设置为“网页设计”,Value属性设置为.F.;
7.在控件窗口中选择复选框控件,在表单上添加控件Check2,在其属性窗口中,将其Caption属性设置为“动漫设计”,Value属性设置为.F.;
8.在控件窗口中选择复选框控件,在表单上添加控件Check3,在其属性窗口中,将其Caption属性设置为“算法设计”,Value属性设置为.F.;
9.在控件窗口中选择列表框控件,在表单上添加控件List1;
10.在控件窗口中选择命令按钮控件,在表单上添加控件Command1,在其属性窗口中,将Caption设置为“添加”,其Click事件参考代码如下: THISFORM.LIST1.CLEAR
IF THISFORM.CHECK1.VALUE=.T.
THISFORM.LIST1.ADDITEM(THISFORM.CHECK1.CAPTION) ENDIF
IF THISFORM.CHECK2.VALUE=.T.
THISFORM.LIST1.ADDITEM(THISFORM.CHECK2.CAPTION) ENDIF
IF THISFORM.CHECK3.VALUE=.T.
THISFORM.LIST1.ADDITEM(THISFORM.CHECK3.CAPTION)
第 11 页 共 28 页
ENDIF
11.在控件窗口中选择命令按钮控件,在表单上添加控件Command2,在属性窗口中,将Caption设置为“关闭”,其Click事件参考代码如下: THISFORM.RELEASE
12.选择“文件/保存”命令,在弹出的对话框中将其保存到考生文件夹中,文件名为SCRE1; 13.单击工具栏中的“运行”按钮运行该表单,调试通过后关闭表单设计窗口; 14.单击“连编”按钮,在“连编选项”对话框中选中“连编可执行文件”; 15.单击“确定”按钮,在“另存为”对话框的应用程序名处输入“PROJ1”; 16.单击“保存”按钮,完成连编。
操作步骤:
1.使用MODI COMM PROG1 命令进入编程窗口。 参考程序: SET TALK OFF USE FCXS COPY TO FCJ USE FCJ SCAN
S=B^2-4*A*C IF S<0 DELE
ELSE
REPL X1 WITH MAX((-B+SQRT(S))/(2*A),(-B-SQRT(S))/(2*A)) REPL X2 WITH MIN((-B+SQRT(S))/(2*A),(-B-SQRT(S))/(2*A)) ENDIF ENDSCAN PACK
CLOSE ALL
CANCEL 2.使用CREATE MENU MENU1命令创建菜单,建立菜单项“计算”和“退出(\\ 第 12 页 共 28 页 模拟题五: 参考答案: 为确保考试数据保存在考生文件夹下,建议启动VFP后,首先执行: SET DEFAULT TO 考生文件夹 1.数据表的合并: 解法1: SELE 1 USE AZGXX SELE 2 USE AZGGZ JOIN WITH A TO ADY FOR A.职工号=B.职工号 and A.是否党员=.T. FIELDS A.职工号,A.姓名,A.职称, B.基本工资 解法2: SELE AZGXX.职工号,姓名,职称,基本工资 FROM AZGXX,AZGGZ WHERE AZGXX.职工号=AZGGZ.职工号 AND 是否党员=.T. INTO TABLE ADY 2.数据表的复制和记录的追加: CLOSE ALL USE AZGXX COPY TO ANEW USE ANEW APPEND &&输入记录 3.数据表的复制、字段的追加和成批修改记录: USE AZGGZ COPY TO AGZ USE AGZ MODIFY STRU &&追加字段“税收” N(6,2) *或用命令:ALTER TABLE AGZ ADD 税收 N(6,2) REPLACE ALL 税收 WITH 基本工资*0.05 第 13 页 共 28 页 操作步骤如下: 1.选择“文件/新建”命令,新建一个项目,项目文件名为PROJ1; 2.单击“代码”列表,并选中“程序”项,单击“添加”按钮,并选中考生文件夹下MAIN.PRG,将该程序添加到项目中; 3.单击“文档”列表,并选中“表单”项,单击“新建”按钮,新建一个新表单; 4.在表单属性窗口中,Caption设置为“图片设置”,Height设置为200,Width设置为400; 5.在表单控件工具栏中2次选择标签控件,在表单的适当位置添加标签Label1和Label2,分别在属性窗口中,将Caption设置为“高度”和“宽度”; 6.在表单控件工具栏中2次选择文本框控件,在表单的适当位置添加文本框Text1和Text2,分别在属性窗口中,将Value设置为50和70; 7.在表单控件工具栏中选择图像框控件,在表单的适当位置添加图像框Image1,在其属性窗口中,将Stretch设置为2,Width设置为70,Height设置为50,通过Picture属性,选择要显示的图片; 8.在表单控件工具栏中选择命令按钮控件,在其属性窗口中,将Caption设置为“确定”; 其Click事件参考代码如下: THISFORM.IMAGE1.HEIGHT=THISFORM.TEXT1.VALUE THISFORM.IMAGE1.WIDTH=THISFORM.TEXT2.VALUE 9.在表单控件工具栏中选择命令按钮控件,在其属性窗口中,将Caption设置为“关闭”,其Click事件参考代码如下: RELEASE THISFORM 10.选择“文件/保存”命令,在弹出的对话框中将其保存到考生文件夹中,文件名为SCRE1; 11.单击工具栏中的“运行”按钮运行该表单,调试通过后关闭表单设计窗口; 12.单击“连编”按钮,在“连编选项”对话框中选中“连编可执行文件”; 13.单击“确定”按钮,在“另存为”对话框的应用程序名处输入“PROJ1”; 14.单击“保存”按钮,完成连编。 第 14 页 共 28 页 操作步骤: 1.使用MODI COMM PROG1 命令进入编程窗口。 参考程序: SET TALK OFF CLEAR USE TJ COPY TO NEW USE NEW FOR I= 101 TO 500 STEP 2 FLAG=.T. FOR J=2 TO SQRT(I) IF INT(I/J)=I/J FLAG=.F. EXIT ENDIF NEXT IF FLAG APPEND BLANK REPL 素数 WITH I ENDIF NEXT USE SET TALK ON 2.使用CREATE MENU MENU1命令创建菜单,建立菜单项“运行(\\ 第 15 页 共 28 页