2012上半年模拟题9套及答案(3)

2019-04-02 12:05

操作步骤如下:

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 页


2012上半年模拟题9套及答案(3).doc 将本文的Word文档下载到电脑 下载失败或者文档不完整,请联系客服人员解决!

下一篇:夹江县安全高效茶叶及新建标准化茶叶生产基地建设项目实施方案

相关阅读
本类排行
× 注册会员免费下载(下载后可以自由复制和排版)

马上注册会员

注:下载文档有可能“只有目录或者内容不全”等情况,请下载之前注意辨别,如果您已付费且无法下载或内容有问题,请联系我们协助你处理。
微信: QQ: