在考生文件夹下完成下列操作: (1)建立一个表单名和文件名均为myform的表单,如下图所示。表单的标题为“教师情况”,表单中有两个命令按钮(Command1和Command2),两个复选框(Checkl和Check2)和两个单选按钮(Optionl和Op

admin2016-09-06  34

问题 在考生文件夹下完成下列操作:
(1)建立一个表单名和文件名均为myform的表单,如下图所示。表单的标题为“教师情况”,表单中有两个命令按钮(Command1和Command2),两个复选框(Checkl和Check2)和两个单选按钮(Optionl和Option2)。Command1和Command2的标题分别是“生成表”和“退出”,Checkl和Check2的标题分别是“系名”和“工资”,Optionl和Option2的标题分别是“按职工号升序”和“按职工号降序”。

(2)为“生成表”命令按钮编写Click事件代码,其功能是根据表单运行时复选框指定的字段和单选钮指定的排序方式生成新的自由表,如果两个复选框都被选中,生成的自由表命名为two.dbf,two.dbf的字段包括职-号、姓名、系名、工资和课程号;如果只有“系名”复选框被选中,生成的自由表命名为one_x.dbf,one_x.dbf的字段包括职工号、姓名、系名和课程号;如果只有“工资”复选框被选中,生成的自由表命名为one_xx.dbf,one_xx.dbf的字段包括职工号、姓名、工资和课程号。
(3)运行表单,并分别执行如下操作:
①选中两个复选框和“按职工号升序”单选钮,单击“生成表”命令按钮。
②只选中“系名”复选框和“按职工号降序”单选钮,单击“生成表”命令按钮。
③只选中“工资”复选框和“按职工号降序”单选钮,单击“生成表”命令按钮。

选项

答案【操作步骤】 步骤1:新建一个表单文件,通过表单控件工具栏向表单中添加各控件,并将“教师表”和“学院表”添加到表单的数据环境中。 步骤2:通过属性窗几设置表单及各控件的相关属性,如图3.110所示。 [*] 步骤3:为“生成表”命令按钮编写Click事件代码。 *****“生成表”按钮的Click事f代码***** &&对a进行赋值,数据来源为复选框Check1值 a= ThisForm.Check1.Value &&时b进行赋值,数据来源为复选框Check2值 b= ThisForm.Check2.Value &&对c进行赋值,数据来源为单选按钮Optiori1值 c= ThisFo rm.Optiongroup1.Option1.Value &&对d进行赋值,数据来源为单选按钮Option2值 d= This Form.Optiongroup1.Option2.Value &&如果两个复选框都被选中 if a =1 andb =1 &&如果按钮1被选中 if c=1 &&选择查询字段并指定字段来源 select职工号,姓名,系名,工资,课程号from教师 表,学院表; &&设置查询条件 where教师表,系号=学院表.系号, &&查询结果按职工号升序排列 order by职工号; &&将查询结果存储到two.dbf中 into table two.dbf else &&如果按钮2被选中 if d=l &&选择查询字段并指定字段来源 select职工号,姓名,系名,工资,课程号from教 师表,学院表; &&设置查询条件 where教师表,系号=学院表,系号, &&查询结果按职工号降序排列 order by职工号desc; &&将查询结果存储到two.dbf中 into table two.dbf endif endif endif &&如果复选框1被选中,2未被选中 if a =l andb =0 &&如果按钮1被选中 if c=1 &&选择查询字段并指定字段来源 select职工号,姓名,系名,课程号from教师表,学院表; &&设置查询条件 where教师表,系号=学院表.系号; &&壹询结果按职工号升序排列 order by职工号; &&将查询结果存储到one x.dbf中 into table one_x.dbf &&如果按钮2被选中 else if d:l &&选择查询字段并指定字段来源 select职工号,姓名,系名,课程号from教师表,学院表; &&设置查询条件 where教师表,系号=学院表.系号; &&查询结果按职工号降序排列 order by职工号desc; &&将查询结果存储到one x.dbf中 into table one x.dbf endif endif endif &&如果复选框2被选中,1未被选中 if a =0 and b =l &&如果按钮1被选中 if c=1 &&选择查询字段并指定字段来源 select职工号,姓名,工资,课程号from教师表,学院表; &&设置查询条件 where教师表.系号=学院表,系号, &&查询结果按职工号升序排列 order by职工号, &&将查询结果存储到one xx.dbf中 into table one_xx.dbf &&如果按钮2被选中 else if d=l &&选择查询字段并指定字段来源 select职工号,姓名,工资,课程号from教师表,学院表; &&设置查询条件 where教师表,系号=学院表,系号; &&查询结果按职工号降序排列 order by职工号desc; &&将查询结果存储到one xx.dbf中 into table one_xx.dbf endif endif endif **************************************** 步骤4:保存表单名为“myform”,按题目要求运行表单并执行相关操作。

解析 本大题主要考查的知识点是:表单的操作和应用,以及IF条件语句的嵌套使用。
新建表单,按照题目要求为表单添加控件并修改相应控件的属性值;在为“生成表”命令按钮编写Click事件代码时,需用到多个嵌套的条件语句,考生要充分理解题目的要求。
第1个嵌套的条件语句功能为:在两个复选都被选中的前提下,若第1个单选按钮被选中,则生成的表中包含指定的字段,并按职工号升序排序记录,若第2个单选按钮被选中,则生成的表包含指定的字段,并按职工号降序排序汜录。根据第1个嵌套语句的功能,考生不难理解另外两个嵌套语句的功能。
转载请注明原文地址:https://jikaoti.com/ti/myk0FFFM
0

最新回复(0)