江苏省等级考试二级vfp春-上机2

合集下载

计算机二级《VFP》上机操作试题及答案

计算机二级《VFP》上机操作试题及答案

计算机二级《VFP》上机操作试题及答案计算机二级《VFP》上机操作试题及答案一、基本操作题(共18分)在考生文件夹下完成下列操作:(1)新建“点歌”数据库,将考生文件夹下的所有自由表添加到该数据库中。

(2)新建一个项目“点歌系统”,将“点歌”数据库添加进该项目。

(3)为“歌曲”表创建一个主索引,索引名为PK,索引表达式为“歌曲id”;再创建一个普通索引,索引名和索引表达式均为“演唱者”,以上索引都为升序。

(4)为“歌手,,表创建一个主索引,索引名和索引表达式都为“歌手id”,升序。

为“歌曲”和“歌手”表创建永久联系,并设置参照完整性约束:更新规则为“级联”,其他默认。

二、简单应用题(共24分)在考生文件夹下完成下列操作:(1)在考生文件夹下利用查询设计器创建一个查询,从表中查询演唱“粤语”歌曲的歌手。

查询结果包含歌手的姓名、语言和点歌码三个字段;各记录按“点歌码”降序排序,点歌码相同的再按“演唱者”升序排序;查询去向为表ta。

最后将查询保存在qa.qpr文件中,并运行该查询。

(2)使用一对多报表向导建立报表,要求父表为“歌手”,子表为“歌曲”。

从父表中选择字段“姓名”和“地区”,从子表中选择字段“歌曲名称”和“点歌码”,两个表通过“歌手id”和“演唱者”建立联系,按“姓名”升序排序,其他默认,生成的报表名为“歌手报表”。

三、综合应用题(共18分)在考生文件夹下完成下列操作:为了查询不同歌手演唱的歌曲,请设计一个表单mform.scx,其界面如下图所示:表单控件名为formone表单的标题为“歌曲查询”。

表单左侧有一个标签控件Labelone,显示内容为“输入歌手姓名”,一个文本框控件Textone用于输入歌手姓名, 个命令按钮Commanda和Commandb分别显示“查询”和“退出”,以及一个表格控件Gridone。

表单运行时,用户首先在文本框中输入歌手“刘德华”,然后单击“查询”按钮,如果输入正确,在表单右侧以表格形式显示此歌手的演唱的歌曲信息,包括歌曲名称、语言和歌,按点歌码升序排序,并将此信息存入tb.dbf文件中。

2002年(春)江苏省等级考试上机试卷

2002年(春)江苏省等级考试上机试卷

2002年(春)江苏省等级考试上机试卷二级 Visual FoxPro (VFP01)(本试卷上机考试时间为70分钟)一、项目、数据库和表操作打开软盘根目录下的项目文件TESTA,在该项目文件中已存在一个数据库SJK,根据下列要求完成有关数据库及表的操作。

1.修改数据库中JS表(教师)的结构,要求:(1)修改jbgz字段的宽度,使之能容纳6位整数和1位小数;(2)将ximing宇段的标题设置为“所在系科”,默认值设置为“系”;(3)设置zc字段的有效性规则及信息;zc(职称)只能是“助教、讲师、副教授、教授”中的—个;(4)创建普通索引glgz,要求先按工龄(g1)排序,如果工龄相同,再按基本厂资(jbgz)排序。

2.将自由表JSB添加到SJK中,并在项目中为该表添加说明:“教师表”。

3.修改JSB表中记录的基本工资(jbgz)数据:教授加125、副教授加89。

4.JS表和RK表已按gh建立永久性关系,试按下列要求设置两个表之间的参照完整性规则:如果在RK表中存在匹配的关键字值,则禁止在JS表中删除记录。

二、设计查询1.在TESTA项目中已存在查询chaxuna,数据库SJK中含有JS表(教师表),教师表中jbgz字段表示教师的基本工资,按如下要求设计查询chaxuna:查询各职称( zc )层次教师的人数和各职称层次教师的平均基本工资,要求输出字段为:zc,人数,平均工资.查询结果按平均工资的降序排序.2.已知SJK数据库中的KC表(课程)包含xf字段(学分)。

在TESTA项目中已存在查询chaxunb,按如下要求设计该查询:基于CJ表(成绩)和KC表(课程)查询各学生各门课程的学分。

学分根据KC表中的xf字段和CJ 表中的cj而定,如果成绩大于或等于60,则学分为KC表中相应课程的xf字段值,否则学分为0 (提示:学分可按表达式iif(cj>=60,kc.xf,0)计算得到)。

要求输出字段为:xh,kcm,cj,学分.查询结果按xh和kcm升序排列,查询结果的输出去向为临时表tmp。

江苏省计算机二级等级(Visual Foxpro)考试应试方法

江苏省计算机二级等级(Visual Foxpro)考试应试方法

江苏省计算机二级等级(Visual Foxpro)考试应试方法作者:沈虹王素云来源:《电脑知识与技术》2014年第33期摘要:该文以江苏省计算机二级等级考试(Visual Foxpro,VFP)的考试大纲为标准,结合学生实际学习过程中遇到的难点,提出应对考试的复习方法,以帮助学生顺利通过考试。

关键词:等级考试;VFP;应试方法中图分类号:G642 文献标识码:A 文章编号:1009-3044(2014)33-7922-02Abstract: This paper discusses the Jiangsu Computer Test (Band Two, Visual Foxpro)outline and the practical difficulties encountered in the learning process of students, proposes review methods in order to help students pass the exam.Key words: Grade test; VFP; Review method随着计算机信息技术的发展和计算机普及教育的深入,江苏省各高校普遍开设计算机信息技术相关课程。

财经类院校面向大学一年级新生的计算机课程以大学计算机信息技术和数据库技术与应用(Visual Foxpro数据库基础)为主。

这两门课程的教学紧紧围绕江苏省计算机二级等级考试的大纲,以拓展学生的信息技术知识,培养学生计算机操作能力、应用能力。

计算机二级等级考试是衡量学生能否拿到学位证书的杠杆,更是让学生学会运用计算机分析问题、解决问题。

作者以多年来对学生进行考前冲刺辅导的经验,结合学生复习过程中遇到的难点,提出应试方法,以帮助学生顺利通过考试。

1 江苏省计算机二级VFP考试考点与形式1.1 信息技术考点理论部分主要包括信息技术基础知识,计算机硬件组成与原理,计算机软件,计算机网络组网技术与原理,信息安全,多媒体信息处理及应用;实践部分主要包括Windows操作系统、Office办公软件(文字处理word软件、电子表格Excel软件、演示文稿制作Powerpoint软件)的使用技巧。

江苏省计算机等级考试二级VFP上机01、02、03含答案和重点看的内容

江苏省计算机等级考试二级VFP上机01、02、03含答案和重点看的内容

08年秋VFP01一、项目、数据库和表操作打开T盘根目录中的项目文件JXGL,在该项目中已有一数据库JXSJ。

1、按下列要求在数据库JXSJ中新建一个表名为AB的数据库表。

(1)按下表所示创建AB表的表结构(包括字段的标题属性):(2)(3)为表设置记录有效性规则:JG小于印张数的1.5倍。

Jg<yz*1.5(4)以FLH的前三位为表达式,为表创建唯一索引,索引名为abcd。

索引表达式left(flh,3)2、在项目中,将JS表设置为“包含”状态。

右击js表选择包含3、为课程安排(KCAP)表增加一个主讲教师字段(字段名为ZJJS,类型为字符型,宽度为20),并设置有效性规则:不能为空(即必须含有非空格字符),此规则对现有数据不对照。

Empty(zjjs)将对照现有数据旁边的复选框勾去掉4、已知院系专业(YXZY)表和学生(XS)表存在相同的院系专业代码(YXZYDM)字段,以YXZY表为主表,XS表为子表,按YXZYDM建立永久关系,并设置YXZY 表和XS表之间的参照完整性:删除级联。

二、设计查询已知教师(JS)表存储了每名教师的基本信息,其中含有文化程度代码(WHCD,C)、出生日期(CSRQ,D)等字段,视图WHCD为文化程度代码与名称对照表,含文化程度代码(DM,C)和文化程度名称(MC,C)字段。

按如下要求修改JXGL项目中的查询CHAXUN:基于JS表和WHCD视图,统计各类文化程度的人数和平均年龄。

要求:输出文化程度名称、人数和平均年龄(字段名依次分别为MC、RS和PJNL),查询结果按人数降序排列,人数相同时按平均年龄升序排列。

(注:教师的年龄为当前日期的年份减去出生日期的年份)。

三、设计菜单JXGL项目中已存在菜单MENU,已定义了“系统管理”菜单栏及其中的“恢复系统菜单”菜单项。

按如下要求设计菜单,完成后的运行效果如图1所示。

1、在“系统管理”菜单栏中插入VFP系统菜单“退出”,并为其设置快捷键CLTRL+T;2、创建“教师管理”菜单栏,其访问键为T,并创建子菜单“浏览”和“统计”,分组线如图1所示;3、为“统计”菜单项设置SELECT-SQL命令,其功能是统计并显示JS表中各类职称(字段名为ZC)的人数,输出字段名为ZC、RS。

江苏省计算机二级VFP考试真题和答案

江苏省计算机二级VFP考试真题和答案
B.报表的数据源只能是表
C.报表布局的常规类型有列报表、行报表、一对多报表等
D.标签实质上是一种多列布局的特殊报表
二、填空题(请将答案填写在答题纸的相应答题号内,每个答案只占一行)
1.关系的基本运算有两类:一类是传统的集合运算,主要指并、差、交等运算:另一类是专门的关系运算,主要指选择、(1)、联接等运算。
12.一个表可以有一个或多个索引,在需要使用某个索引时必须显式地指定,即将某个索引设置为"主控索引"。在USE命令中使用(22)子句,可以在打开表的同时设置主控索引。
13.在教学管理数据库JxsJ中有2个表:XS.DBF(学生表)和CJ.DBF(成绩表),表结构如下:
XS.DBF
字段名含义字段类型及宽度
A.This.Parent.Cmd2.Enabled=.F.
B.ThisForm.Cmd2.Enabled=.F.
mandGroup1.cmd2.Enabled=.F.
D.THIS.Cmd2.Enabled=.F.
29.在下列几组控件中,均具有ControlSource属性和Value属性的是29。
6.在下列PC机I/O接口中,数据传输速率最快的是6。
B 2.0 B.IEEE-1394 C.IrDA (红外)D.SATA
7.计算机软件可以分为商品软件、共享软件和自由软件等类型。在下列相关叙述中,错误的是7。
A.通常用户需要付费才能得到商品软件的使用权,但这类软件的升级总是免费的
B.共享软件通常是一种"买前免费试用"的具有版权的软件
C.保证传送的数据信息不被篡改D.保证发送方不能抵赖曾经发送过某数据信息
16.某计算机系统中,西文使用标准ASCII码、汉字采用GB2312编码。设有一段纯文本,其机内码为CB F5 DO B4 50 43 CA C7 D6 B8,则在这段文本中含有:16。

春江苏省计算机等级考试二级VFP

春江苏省计算机等级考试二级VFP

春江苏省计算机等级考试二级VFP春江苏省计算机等级考试二级VFP第二部分Visual Foxpro程序设计.一、选择题(用答题卡答题,答案依次填在21~30答题号内)21.关系的基本运算有并、差、交、选择、投影、联接(连接)等。

这些关系运算中,运算对象必须为两个关系且关系不必有相同关系模式的是 21 。

A.并B.交C.投影D.联接22.在下列有关日期,时间型表示式中,语法上不正确的是 22 。

A.DATE()-400B.DATETIME0+400C.DATETIME()-DATE()D.DTOC(DATE())-TTOC(DATETIME())23.打开一个无记录的空表,若未作任何与记录指针移动相关的操作,则执行命令"?RECNO(),BOF()EOF()"后屏幕上应显示 23 。

A.0、.T.和.T.B.0、.T.和.RC.1、.T.和.T.D.1、.T.和.R24.在下列有关数据库及表的叙述中,错误的是 24 。

A.在打开数据库表时,相关的数据库不会自动地被打开、也不需要被打开B.使用CLOSE DATABASE ALL命令关闭数据库时,将关闭所有的已打开的表C.一个表能够在多个工作区中被打开D.利用项目管理器中的"移去"操作删除数据库时,数据库中的所有表均转换成自由表25.在下列有关查询的叙述中,错误的是 25 。

A.查询所基于的数据能够是表和视图,不能基于查询来创立查询B.只要查询的输出字段中有统计函数(如COUNT()、SUM()等),则必须设置分组字段,否则查询无法运行C.查询文件是一个文本文件,用户能够使用任何文本编辑器(如Windows操作系统中的"记事本")对其进行编辑D.查询的输出去向能够是文本文件,但不能直接输出为Microsoft Excel格式的文件26.设当前工作目录(文件夹)中有一个表文件ABC.DBF,该表仅有两个字段(字段名分别为xx和yy,字段类型均为字符型,宽度均为10),且含有多条记录。

2010年春季江苏省计算机等级考试二级VFP考试试题(含答案)

2010年春季江苏省计算机等级考试二级VFP考试试题(含答案)

2010年春季江苏省计算机等级考试二级VFP考试试题(含答案)2010年春季江苏省计算机等级考试二级VFP考试试题第一部分计算机基础知识1.下面关于通信技术的叙述中,错误的是______。

A.任何一个通信系统都有信源、信道和信宿这三个基本组成部分B.为了实现远距离传输信息,在模拟通信和数字通信中均采用载波技术C.为了降低传输信息的成本,在通信中广泛采用多路复用技术D.数字通信系统的一个主要性能参数是信道带宽,它指实际进行数据传输时单位时间内传输的二进位数目2.在下列有关集成电路及其应用的叙述中,错误的是________。

A.集成电路的制造工序繁多,工艺复杂且技术难度高B.经过抛光后的硅片称为晶圆,每个晶圆最多可以制成一个合格的集成电路芯片C.IC卡分为接触式IC卡和非接触式IC卡,后者通常又称为射频卡或感应卡D.集成电路应用十分广泛,目前我国第2代居民身份证中就有集成电路芯片3.在下列有关数字技术的一些叙述中,错误的是______A.数字技术是采用有限个状态(例如"0"和"1")来表示、处理、存储和传输信息的B.在逻辑代数中,1与1进行逻辑加(V)和逻辑乘(^)的结果相同C.任何一个十进制数,均可以精确地转换成等值的二进制数D.在PC机中,通常用原码表示正整数、用补码表示负整数4.在下列有关PC机主机的叙述中,错误的是______。

A.BIOS和CMOS存储器安装在主板上,普通用户一般不能自己更换B.由于PC机主板的物理尺寸等没有标准化,所以不同PC机的主板均不能互换C.芯片组是PC机各组成部分相互连接和通信的枢纽,一般由2块VLSI芯片组成D.芯片组决定了主板上所能安装的内存最大容量、速度及可使用的内存条类型5.在下列4个Intel微处理器产品中,采用双核结构的是__________A. Core 2 DuoB.Pentium PROC.Pentium IIID.Pentium 46.在下列四种PC机主存储器类型中,目前常用的是__________。

江苏省计算机等级考试二级VFP2010春上机考试参考答案

江苏省计算机等级考试二级VFP2010春上机考试参考答案

江苏省计算机等级考试⼆级VFP2010春上机考试参考答案参考答案2010C01⼀、1.(2)!(3)索引表达式:ZZXM+LWM(4)LX字段显⽰类为:CheckBox3.LX<>"专业核⼼课程"⼆、SELECT Cj.xh, SUM(IIF(Cj.cj>=60,Kc.xf,0)) AS 总学分;FROM jxsj!kc INNER JOIN jxsj!cj ;ON Kc.kcdm = Cj.kcdm;GROUP BY Cj.xh;HAVING 总学分 < 20;ORDER BY 2 DESC三、3.设置“学⽣”菜单项跳过条件:USED("xs")5.打开菜单设计器,使⽤系统菜单“显⽰”→“常规选项”→“清理”,输⼊相应代码。

四、3.添加的组合框控件Name属性设为 Cbo2、RowSource属性设为 *.dbf4.设Check1的Value属性为1或.T.5.组合框Cbo1的Init事件代码:This.Value="0 ⽆,1⽔平滚动条,2垂直滚动条,3(缺省值)⽔平滚动条和垂直滚动条"6.Thisform.Grd1.RecordSource=This.Value五、第12⾏:将i=2改为 i=i+1倒数第5⾏:将OTHER改为ELSE2010C02⼀、1.(3)索引表达式:TYKH(4)MDJ3.DELETE FROM kc WHEER LX="选修课程"⼆、SELECT Kcap.xqbm, Kcap.kcdm, Kc.kcmc, COUNT(*) AS 教师⼈数;FROM jxsj!kcap INNER JOIN jxsj!kc ;ON Kcap.kcdm = Kc.kcdm;GROUP BY Kcap.xqbm, Kcap.kcdm;HAVING 教师⼈数 >= 2三、3.设置“排课”菜单项跳过条件:!USED("kcap")四、1.微调框Name属性设为Spn1;SpinnerLowValue和KeyboardLowValue设为1;SpinnerHighValue和KeyboardHighValue设为102.组合框Cbo1的RowSourceType属性设为:1-值4.复选框的Click事件代码:Thisform.Grd1.DeleteMark= This.Value5.Thisform.Grd1.ColumnCount=This.Value五、第7⾏:将z+SUBS(y,j,1)改为SUBS(y,j,1)+z倒数第6⾏:将LEN(m)改为m2010C03⼀、1.(3)DJ字段有效性规则表达式:DJ>1000(4)索引表达式:DTOC(GMRQ,1)+STR(DJ)3.删除触发器:YEAR(DATE())-YEAR(CSRQ)>=60⼆、SELECT Xs.xh, Xs.xm, SUM(IIF(Cj.cj>=60,1,0)) AS 合格门数;FROM jxsj!xs INNER JOIN jxsj!cj;ON Xs.xh = Cj.xh;GROUP BY Xs.xh;HAVING Min(Cj.cj) >= 60;ORDER BY 3 DESC三、5.设置“浏览”菜单项跳过条件:!USED("xs")四、1.设置表单属性:AutoCenter为 .T.、MaxButton和MinButton为 .F.2.设置列表框List1的RowSourceType属性为 5-数组、RowSource属性为 X3.设置选项按钮组Opt1的BorderStyle为 0-⽆、BackStyle为 0-透明4.使⽤系统菜单“表单”→“新建⽅法程序”命令创建USERSORTD表单新⽅法,复制USERSORTA⽅法代码到USERSORTD⽅法中,将其中IF X(j)X(i)5.在OPT1的Click事件代码两个空⽩处分别添加两个语句:/doc/e28d4229cfc789eb172dc894.html ERSORTA和/doc/e28d4229cfc789eb172dc894.html ERSORTD五、第5⾏:将SUBS(STR(i),j,1)改为SUBS(ALLT(STR(i)),j,1)倒数第7⾏:将PRIVATE x改为PARAMETERS x2010C04⼀、1.(2)表的记录有效性规则表达式:KGRQ(3)字段有效性规则表达式:!ISBLANK(XMJL)(4)索引表达式:DTOC(KGRQ,1)+ XMJL2.插⼊触发器:IIF(KCDM="4003","沈爱国"$ZZ,.T.)3.打开表设计器在XS表中增加⼀备注型字段BZ;浏览XS表,利⽤VFP主菜单“表”→“替换字段”命令,替换字段 BZ、替换为"转专业"、作⽤范围选 ALL、条件FOR为 LEFT(YXZYDM,4)!=SUBS(XH,3,4) ⼆、SELECT Cj.xh, Cj.kcdm, Cj.cj, Cjb.cj AS cj2;FROM jxsj!cj INNER JOIN cjb ;ON Cj.xh = Cjb.xh;WHERE Cj.cj <> Cjb.cj;AND Cj.kcdm = Cjb.kcdm;ORDER BY Cj.kcdm, Cj.xh三、3.设置“代码管理”菜单项跳过条件:!USED("dmb")四、1.设置⽂本框Txtmm的PasswordChar属性为 *2.设置⽂本框Txtje的Inputmask属性为 9,999.99、Value属性为 03.添加⼀⽂本框控件并设Name属性为Txtrq、Value为 =DATE()、Enabled为 .F.4.IF LEN(ALLT(THIS.VALUE))<>65.=MESSAGEBOX("⼀次取款必须在0-5000之间",48,"提⽰")五、第2⾏:将FOR i=4 TO 200改为FOR i=4 TO 200 STEP 2倒数第7⾏:将FOR n=1 TO SQRT(m)改为FOR n=2 TO SQRT(m)2010C05⼀、1.(2)掩码:999999999999(12个9)(3)索引表达式:ND+XH(4)JXJ显⽰类:ListBox3.删除触发器:.F.⼆、SELECT Xs.xh, Xs.xm, AVG(Cj.cj) AS 平均分;FROM jxsj!xs INNER JOIN jxsj!cj ;ON Xs.xh = Cj.xh;GROUP BY 1;HAVING MIN(Cj.cj)>=80 AND COUNT(*)>=6;ORDER BY 3 DESC三、3.设置“备份”菜单项跳过条件:!USED("jc")四、1.设置图象框IMG1属性:Picture属性为 CONFECTI.BMP、Stretch属性为 2-变⽐填充、Border_ Color属性为红⾊、BorderStyle属性为 1-固定单线2.利⽤VFP主菜单“表单”→“编辑属性/⽅法程序”命令,添加相应说明后点击“应⽤”按钮。

  1. 1、下载文档前请自行甄别文档内容的完整性,平台不提供额外的编辑、内容补充、找答案等附加服务。
  2. 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
  3. 3、如文档侵犯您的权益,请联系客服反馈,我们会尽快为您处理(人工客服工作时间:9:00-18:30)。

2012春-上机2 (本试卷完成时间为70分钟)
1.首先登录考生信息,然后启动VFP并在命令窗口中执行如下命令,以设置默认的工作目录:set defa to T:
2.除非题目要求,否则不要对T盘上的文件进行重命名、复制和删除操作。

一、项目、数据库和表操作(12分)
打开T盘根目录中的项目文件JXGL,在该项目中已有一数据库JXSJ。

1.在JXSJ数据库中按下表所示的结构创建AB.DBF表,并按表格中的要求设置相关属性。

字段名数据类型宽度字段标题
RQ D 8 日期
LGMC C 20 旅馆名称
XJ C 4 星级
RZL N 6(小数2位) 入住率
(1)设置表的注释:世博会期间上海旅馆入住率统计表;
(2)设置XJ字段的默认值:三星;
(3)设置LGMC字段的显示类:下拉列表框;
(4)设置RZL字段的有效性规则:大于等于0且小于等于100;
(5)创建索引名为ABCD的普通索引,要求按日期排序,日期相同时按入住率排序
2.在AB表中输入如下记录:
RQ LGMC XJ RZL
2010-05-10 锦江之星零星90
3.计算JYB中FK字段的值:借阅天数超过30天的按超过天数罚款(借阅天数根据借阅日期JYRQ与还书日期HSRQ计算),学生(LX字段的值为X)超期每天罚0.1元,教师(LX字段的值为J)超期每天罚0.2元
4.YXZY表与JS表具有相同的字段YXZYDM,以YXZY表为主表,JS表为子表,根据YXZYDM建立永久关系,并设置两表之间的参照完整性:更新级联、插入限制。

二.设计查询(8分)
已知课程安排表(KCAP.DBF)存储了每个学期各班级所上的课程信息,其中含学期编码(XQBM,C)、班级编号(BJBH,c)等字段;课程表(KC.DBF)存储了每门课程的信息,其中含课程代码(KCDM,C),学分(XF,N)等字段,按如下要求修改JXGL项目中的查询CHAXUN:基于KCAP表和KC表,查询每学年(由XQBM字段的前13个字节内容指定),每个班级的课程门数和总学分。

要求输出字段依次为学年、BJBH、课程门数、总学分,查询结果按学年排序,输出去向为临时表(表名为ABCD)。

三、设计菜单
JXGL项目中已存在菜单MENU,其中已定义了"文件"菜单栏及其中的"退出菜单"项。

按如下要求设计菜单,完成后的运行效果如图1所示。

1.将"文件"菜单栏修改为"文件管理",并设置其访问键"F"。

2.在"文件管理"菜单栏中添加菜单项"新建"、"打开"、"关闭"(其中"新建"、"打开"为系统菜单项),并在"打开"与"关闭"、"关闭"与"退出菜单"之间设置分组线。

3.为"关闭"菜单项创建子菜单"数据库"、"表"。

4.为"表"菜单项设置"跳过"条件,使该菜单项不可用。

5.为"数据库"菜单项设置命令,命令的功能是关闭所有已打开的数据库。

四、设计表单(10分)
表单FRM12E用于文字缩放演示。

按下列要求修改表单,修改后的表单运行时如图2所示。

1.设置表单的标题为"文字缩放"。

2.添加标签对象Label1,并设置相关属性:标题为"等级考试",且能根据标题内容自动调节大小。

3.添加两个命令按钮,并按图2所示设置标题为"缩小"和"放大",
同时设置"缩小"命令按钮的有关属性使其不可使用
4.为"放大"命令按钮编写Click事件代码:调用表单的方法XXX(已创建)。

5.将表单的XXX方法程序代码,复制到"缩小"命令按钮的Click事件代码中,修改程序代码的前3行,实现:
(1)"缩小"命令按钮不可使用,“放大"命令按钮可使用;
(2)标签对象标题逐渐缩小显示。

五、程序改错(5分)
下列程序中PrintPrime过程的功能是查找所有小于自然数nMax的素数,并按每行nCol个
素数显示在主窗口中。

素数是大于1且只能被1和自身整除的整数,如2、3、5、7等。

判断一个自然数N是否是素数的方法是:用N除以从2到大于N的最小整数之间的每一个整数j,若所有的j都不能整除N,则N为素数。

要求:
1.项目中有一个程序文件Pcode,将T盘中VFP01.TXT中的程序代码复制到其中并进行修改。

2.在修改程序时,不允许修改程序的总体框架和算法,不允许增加或减少语句数目。

1 CLEAR
2 DO PrintPrime(400,5)
3 PROCEDURE PrintPrime
4 PARA nMax,nCol
5 i=0 &&记录素数个数
6 FOR n=2 TO nMax
7 Flag=.T.
8 FOR j=2 TO INT(SQRT(n))
9 IF n%j=0
10 Flag=.F.
11 RETURN
12 ENDIF
13 ENDFOR
14 IF FLag
15 ?? n
16 i=i+1
17 IF MOD(i,nCol)=0
18 ?
19 ENDIF
20 ENDIF
21 ENDFOR
22 ENDPROC
参考答案
一、项目、数据库和表操作
LGMC字段的显示类:Listbox
RZL字段的有效性规则:BETWEEN(RZL,0,100)
ABCD索引表达式:DTOC(RQ,1)+STR(RZL,6,2)
UPDA TE JYB SET FK=IIF(LX='X',0.1,0.2)*IIF(HSRQ-JYRQ>30,HSRQ-JYRQ-30,0)
二、设计查询
SELECT LEFT(ALLT(XQBM),13)AS 学年,KCAP.BJBH,COUNT($) AS课程门数,;
SUM(XF) AS 总学分;
FROM JXSJ!KCAP INNER JOIN JXSJ!KC;
ON KCAP.KCDM=KC.KCDM;
GROUP BY 1,KCAP.BJBH;
ORDER BY 1;
INTO CURSOR ABCD 三、设计菜单
为"表"菜单项设置"跳过"条件:.T.
为“数据库"菜单项设置命令:CLOSE DA TABASE ALL 四.设计表单 题号 对象名 属性/事件/方法名 属性值/代码 1 Forml Caption 属性 文字缩放 2
Labell Caption 属性 等级考试 AutoSize 属性 .T. 3 Commandl Caption 属性 放大
Command2 Caption 属性 缩小 Enabled 属性 .F.
4
Commandl Click 事件 ThisForm.XXX Command2
Click 事件
mand2.Enabled=.F.
mandl.Enabled=.T.
For i=40 to 9 step -1 bell.Font Size=i
=INKEY(0.3) EndFor
五、程序改错
第2行DO printPrime(400,5) 该为PrintPrime With 400,5 第11行Return 改为Exit。

相关文档
最新文档