2022年重庆计算机二级vf上机模拟题 .pdf

《2022年重庆计算机二级vf上机模拟题 .pdf》由会员分享，可在线阅读，更多相关《2022年重庆计算机二级vf上机模拟题 .pdf（3页珍藏版）》请在淘文阁 - 分享文档赚钱的网站上搜索。

1、上机模拟考试三：两个数的最大公数和最小公倍数（表单内有四个标签，两个文本框、一个命令按钮）Form1 属性设置： Caption=”两个正整数的最大公约数和最小公倍数”Dblclick 事件： thisform.release 或 this.release text1 和text2 的 value 属性初值都为0 command1 属性设置： Caption=” 计算 ”Click 事件代码 : m=f_gcd.text1.value & 以表单的文件主名开头f_gcd.是绝对引用 ,thisform.text1.value是相对引用n=f_gcd.text2.value & 以表单的文件主名

2、开头f_gcd.是绝对引用 ,thisform.text2.value 是相对引用m1=m n1=n r=mod(m,n) do while r0 m=n n=r r=mod(m,n) endd thisform.label3.visible=.t. thisform.label4.visible=.t. thisform.label3.caption= 最大公约数： +str(n,3) thisform.label4.caption= 最小公倍数： +str(m1*n1/n,5) thisform.refresh 上机模拟考试四：表单浏览数据表1、创建如上图所示的表单，实现 STUDENT

3、表的翻页浏览与编辑，具体要求如下：(1)新建一个表单，打开数据环境，添加student 表，并将student表的部分字段映像到表单中，接着在表单的右边添加5 个命令按钮，各命令按钮大小一样，垂直方向对齐，间距一样，大体布局如图所示。(2) 在 表 单 的 右 上 角 按 序 添 加 标 签 控 件LABEL1, 文 本 框 控 件TEXT1 ，标签控件LABEL2 ；(3)LABEL1 、LABEL2的标题分别为“第” 、 “页” ，背景透明，大小自动适应内容，字体为黑体， 11 号、加粗。(4)TEXT1 背景透明，无边框，文本在控件里居中; (5)TEXT1 用以显示当前页记录号(6)在

4、表单的左上角添加LABEL3 控件，用以显示系统日期。(7)表单背景色为纯蓝色，运行时在屏幕上居中。(8)命令按钮COMMAND1标题为“首页” ， 实现 STUDENT 表第 1 条记录的浏览与编辑。(9)命令按钮COMMAND2标题为“上一页” ， 实现当前记录上一条记录的浏览与编辑。(10)命令按钮COMMAND3标题为 “下一页”， 实现当前记录下一条记录记录的浏览与编辑。(11)命令按钮COMMAND4标题为“末页” ， 实现 STUDENT 表最后一条记录的浏览与编辑。(12)命令按钮COMMAND5标题为“退出” ， 实现表单的释放。表单 init 事件 X=dtoc(date(

5、),1) Thisform.label3.caption=subs(x,1,4)+ ”COMMAND3单击事件 Skip If eof() Go bott Tmand3.enabled=.f. Endi Tmand2.enabled=.t. Thisform.text1.value=recn() Thisform.refresh COMMAND4单击事件 Go bott Thisform.text1.value=recn() Tmand2.enabled=.t. Tmand3.enabled=.f. Thisform.refresh COMMAND4单击事件 Thisform.release

6、名师资料总结 - - -精品资料欢迎下载 - - - - - - - - - - - - - - - - - - 名师精心整理 - - - - - - - 第 1 页，共 3 页 - - - - - - - - - 年” +subs(x,5,2)+” 月” +subs(x,7,2)+” 日”COMMAND1单击事件 Go top Thisform.text1.value=recn() Tmand2.enabled=.f. Tmand3.enabled=.t. Thisform.refresh COMMAND2单击事件 Skip -1 If bof() Go top Tmand2.enabled

7、=.f. Endi Tmand3.enabled=.t. Thisform.text1.value=recn() Thisform.refresh 上机模拟考试五、 利用复选框设置label1 标签标题为粗体、斜体、下划线、删除线，文本框输入的字符作为label1 的标题，请写出其相应过程。1)创建表单。2)摆放一个label1 标签和一个文本框和四个复选框。3)按右图设置其各对象的属性。4) 文本框 lostfocus 事件代码：Thisform.label1.caption=this.value 粗体复选框的click 事件代码：if this.value=1 thisform.label

8、1.fontbold=.T. else thisform.label1.fontbold=.F. endi 斜体复选框的click 事件代码：if this.value=1 thisform.label1.fontItalic=.T. else thisform.label1.fontItalic=.F. endi 上机模拟考试六、表单 +多张数据表（ SQL 语言查询结果存入数组便于送到文本框输出）举例1)创建表单。2)设置数据环境：添加xsda和 xscj 表3)摆放右图所示：一个 label1 标签、一个文本框、一个组合框和一个选项按钮组四个对象。4)按右图设置其各对象的属性。组合框的

9、rowsourcetype 为 6字段， rowsource 为 xsda.学号， xsda.姓名 ;boundcolumn=1 5) form1 的 load 事件 为：public kcs(1),pjcj(1) kcs=0 pjcj=0 组合框的 click事件为：sele count(*) from xscj where 学号 =this.value into array kcs sele avg(考试成绩 ) from xscj where 学号 =this.value into array pjcj do case case thisform.optiongroup1.value=1

10、 thisform.text1.value= 平均成绩 +str(pjcj,5,2) &kcs(1,1) 和 pjcj(1,1) 可作 kcs(1)和 pjcj(1), 也可 kcs 和 pjcj case thisform.optiongroup1.value=2 thisform.text1.value= 已修课程 +str(kcs,2)+ 门 endc optiongroup1.click事件代码 为: do case case thisform.optiongroup1.value=1 下划线复选框的click 事件代码：If this.value=1 thisform.label1.

11、fontunderline=.T. else thisform.label1.fontunderline=.F. endi 删除线复选框的click 事件代码：If this.value=1 thisform.label1.fontStrikethru=.T. else thisform.label1.fontStrikethru=.F. endi 名师资料总结 - - -精品资料欢迎下载 - - - - - - - - - - - - - - - - - - 名师精心整理 - - - - - - - 第 2 页，共 3 页 - - - - - - - - - thisform.text1.v

12、alue= 平均成绩 +str(pjcj,5,2) case thisform.optiongroup1.value=2 thisform.text1.value= 已修课程 +str(kcs,2)+ 门 endc上机模拟考试七、表单+多张数据表（SQL 语言查询结果送给表格对象输出）举例1)创建表单。(& 查询每一个学生选哪些课程) 2)设置数据环境：添加xsda表3)摆放右图所示：一个 label1 标签、一个组合框和表格三个对象。4)按右图设置其各对象的属性。组合框的rowsourcetype 为 6 字段， rowsource 为 xsda.学号，xsda.姓名 ;boundcolum

13、n=1 5) 组合框的 click 事件为：x=allt(this.value) sql=sele xsda.学号 ,姓名 ,入学总分 ,考试成绩 ,课程名from xsda,xscj,xskc where xsda.学号 =x and xsda.学号 =xscj.学号and xscj.课程号 =xskc.课程号into cursor temp thisform.grid1.recordsourcetype=4 thisform.grid1.recordsource=sql 二、建立表单1. 在命令窗口中输入建立表单命令CREATE FORM myform2. 在“表单设计器”窗口中，在“属性

14、”的Name处输入“ myform”。 3. 在“表单设计器”窗口中，添加一个表格控件，在“属性”的RecordSourceType 处选择“ 3 - 查询 (.QPR) ”，在 RecordSource 处输入“chaxun ”。4. 在“表单设计器”的下方，添加一个命令按钮，在“属性”窗口的Caption处输入“退出”，双击“退出”命令按钮，在“Command1.Click ”编辑窗口中输入“Release Thisform ”，接着关闭编辑窗口。5. 同时选定 “表格” 和“命令” 按钮， 把对应的 “Left ”和“ Width”值输入相同的值名师资料总结 - - -精品资料欢迎下载 - - - - - - - - - - - - - - - - - - 名师精心整理 - - - - - - - 第 3 页，共 3 页 - - - - - - - - -