VF第9章至第12章表单部分复习题.doc

。四川省计算机等级考试二级(VF)面向对象程序设计（表单）部分综合复习题一、单项选择题1、如图所示，选项按钮组的值为( A )。 (A)2 (B)0 (C)1 (D)非团员2、命令按钮组是（B）A）控件 （B）容器 （C）控件类对象 （D）容器类对象3、在VF中，表单是指：（ D ）A）数据库中的各个表的清单B）一个表中各个记录的清单C）数据库查询的列表 D）窗口界面4、在表单的常用方法中，将表单从内存中释放的方法是（ B ） A、Show B、 Release C、Hide D、Refresh5、要使得命令按钮有效，应设置该命令按钮的( C )A)Visible属性值为T B)Visible属性值为FC)Enabled属性值为T D)Enabled属性值为F 6、在Visual FoxPro的数据工作期窗口，使用SET RELATION命令可以建立两个表之间的关联，这种关联是（C）。A）永久性关联 （B）永久性关联或临时性关联C）临时性关联 （D）永久性关联和临时性关联7、设计菜单时，不需要完成的操作是（ B ）A、生成菜单程序 B、浏览表单 C、指定各菜单任务 D、创建主菜单及子菜单二、程序填空题1、如下图所示，用标签、文本、命令按钮构成一个表单。在标签中显示以下文字“当前时间”，运行表单时，单击“显示”按钮将显示系统时间；单击“清除”按钮，文本框中的内容被清除，单击“退出”按钮，将退出表单运行。为完成上述要求：(1)“清除”按钮的click事件代码是 THISFORM.TEXT1.VALUE=”(2)“退出”按钮的click事件代码是 THISFORM.RELEASE (3)“显示”按钮的click事件代码是 THISFORM.TEXT1.VALUE=TIME() (4) 应该设置表单的 CAPTION 属性为“显示当前系统时间”13、设计一个四则运算的表单如下图所示： (1)由以上图可知本表单的_【1】CAPTION _属性应设置成“四则运算” (2) 按钮的ClICK代码如下Xl=VAL(THISFORM.TEXT1.VALUE) X2=VAL(THISFORM.TEXT2.VALUE) XX= 【2】 THISFORM.OPTIONGROUP1.VALUE DO 【3】 CASE CASE XX=1 THISFORM.TEXT3.VALUE=X1+X2 CASE XX=2 THISFORM.TEXT3.VALUE=X1-X2 CASE XX=3 THISFORM.TEXT3.VALUE=X1*X2 CASE XX=4THISFORM.TEXT3.VALUE=X1/x2 【4】ENDCASE (3) 按钮的CliCK代码如下THISFORM.TEXTl.VAlUE=THlSFORM.TEXT2.VALUE=THISFORM.TEXT3.VALUE= 【5】THISFORM.OPTIONGROUP1.VALUE=1 THISFORM.TEXTl.SETFOCUS (4) 按钮的CLICK代码_【6】_ thisform.release _ 15、创建一个检查口令输入的表单，口令设置为“ABCD”，要求： 开始运行是，Label2不显示任何信息，在前两次输入口令错误时显示“口令错，请重新输入口令！”，第三次输入口令错误时显示“对不起，您无权使用本系统！”。如口令正确则显示“欢迎使用本系统”。 单击“确定”按钮（Command1）时，检查用户输入口令的正确性及输入次数，口令三次输入错误时，处于禁用状态。 Text1用语接收用户输入的口令，口令输入时，其中的值用“*”号显示，当口令三次输入错误时，处于禁用状态。 单击“关闭”按钮（Command2）时，关闭本表单。 （1）Label2的Caption属性的初始值应设置为：_； （2）为用”*”号显示输入口令，应设置Text1的_ passwordchar _属性，属性值为“_*_”； （3）表单Form1的Form1.activeate事件代码为 Thisform.Text1.SetFocus PUBLIC n n=0 （4）Command1按钮（“确定”按钮）的Click事件代码为： M=thisform.text1.value If_ thisform.text1.value=ABCD_ thisform.label2.caption=“欢迎使用本系统!”Else n=n+1 thisform.label2.caption=“口令错，请重新输入口令！” thisform.text1.value=_ thisform.text1.setfocus if _ n=3_ thisform.label2.caption=“对不起，您无权使用本系统！” thisform.text1.enabled=f_ mand1.enabled=.f._endifendif(5)命令按钮Comand2（“关闭”按钮）的Click事件代码为 _thisform.release_三、表单程序设计1、利用磁盘上已有的数据表”RS.DBF”,建立一张删除记录的表单(from_2),界面如下所示. 要求:(1) 用文本框显示”人事数据表中记录的逻辑删除”,该控件在运行时不能输入新的文本内容.(2) 将表中所有的字段按上图添加到表单中(3) 添加一个命令组控件,其中包括三个命令按钮:”上一条”,”下一条”,”逻辑删除”.当记录显示到第一条记录时,”上一条”按钮不可使用,当记录显示到最后条记录时;”下一条”按钮不可使用;当记录显示不是在第一条记录,”上一条”按钮恢复使用;当记录显示不是最后条记录,”下一条”按钮恢复使用.当点击”逻辑删除”按钮时,则将当前记录逻辑删除.(4) 表中再添加一个命令按钮”结束”,当点击”结束”按钮时,表单的运行结束.（1） 第一个文本的设置（5分） value=”人事数据表中记录的逻辑删除“。 Readonly=.t. （2）添加表中记录控件及属性设置 （10分） 标签控件：Label1.Caption=“编号”，Label2.Caption=“姓名”，Label3.Caption=“出生年月”， Label4.Caption=“职称”，Label5.Caption=“工资”；Label6.Caption=“奖金”，Label7.Caption=“部门”；文本框控件：Text1的controlsource=rs.编号，Text2的controlsource=rs.姓名，Text3的controlsource=rs.出生年月，Text4的controlsource=rs.职称，Text5的controlsource=rs.工资，Text6的controlsource=rs.奖金，Text7的controlsource=rs.部门；命令按钮组控件： Commandgroup1.buttomcount=3 Cmand1.caption=“上一条” Cmand1.caption=“下一条” Cmand1.caption=“逻辑删除” “命令按钮”控件：caption=“结束” （3）当记录显示到第一条记录时，“上一条”按钮不可使用，当记录显示到最后条记录时，“下一条”按钮不可使用；当记录显示不是在第一条记录，“上一条”按钮恢复使用；当记录显示不是最后条记录，“下一条”按钮恢复使用。 （20分） “上一条”按钮的click事件代码 mand1.enabled=.t. if recno()=1 mand2.enabled=.f. else skip - 1 endif thisform.refresh “下一条”按钮的click事件代码 mand1.enabled=.t. if recno()=reccount（） mand2.enabled=.f. else skip endif thisform.refresh（4）当点击“添加记录”按钮时，则可向本数据表添加新的数据。 （10分） 添加记录按钮的click事件代码： dele thisform.refresh (5) 当点击“退出”按钮时，结束表单的运行。 （5分） “退出”按钮的click事件代码： thisform.release2、利用磁盘上已有的数据表”STDA.DBF”,建立一张查询记录的表单(form_3),界面如下:要求:(1) 将表中所有的字段按上图所示添加到表单中.(2) 添加一个命令组控件,其中包括二个命令按钮:”确定”,”取消”.当输入查询学号后,点击”确定”按钮，则显示查询结果;点击”取消”按钮，则表示重新输入查询学号.(3) 表中再添加一个命令按钮”查询结果”,当点击”查询结束”按钮时,表单的运行结束.(4) 运行表单时,若没有输入查询的学号,则表单中不显示任何记录(注:显示的记录内容不能修改). （1） 添加表中控件及属性设置 （10分） 标签控件：Label1.Caption=“学生信息查询”，LabelCaption=“请输入查询学号”，Label3.Caption=“学号”，Label4.Caption=“姓名”，Label5.Caption=“性别”；Label6.Caption=“出生日期”，Label7.Caption=“籍贯”，Label8.Caption=“入学分”；文本框空间“Text2的controlsource=stda.学号，Text3的controlsource=stda.姓名，Text4的controlsource=stda.性别，Text5的controlsource=stda.出生日期，Text6的controlsource=stda.籍贯，Text7的controlsource=stda.入学分；命令按钮组控件： Commandgroup1.buttomcount=2 Cmand1.caption=“确定” Cmand1.caption=“取消” “命令按钮”控件：caption=“查询结束“（2）“确定”，“取消”。当输入查询学号后，点击“确定”按钮，则显示查询结果；点击“取消”按钮，则表示重新输入查询学号。 （15分） “确定”按钮的click事件代码 （10分） loca for alltrim(stda.学号)=alltrim(thisform.text1.value) if found() thisform.refresh endif “取消”按钮的click事件代码 （5分） thisform.text1.value=” thisform.text1.setfocus thisform.refresh (3) 当点击“查询结束”按钮时，结束表单的运行。 （5分）“查询结束”按钮的click事件代码：thisform.release（）运行表单时，若没有输入查询的学号，则表单中不显示任何记录（注：显示的记录内容不能修改）（分）Form表单的init事件代码：thisform.txt学号.value“”thisform.txt姓名.value“”thisform.chk性别.value.f.thisform.txt出生日