问答题 在考生文件夹下完成下列操作:   (1)建立一个表单名和文件名均为my form的表单,如下图所示。表单的标题为“教师情况”,表单中有两个命令按钮(Command1和Command2),两个复选框(Check1和Check2)和两个单选按钮(Option1和Option2)。Command1和Command2的标题分别是“生成表”和“退出”,Check1和Check2的标题分别是“系名”和“工资”,Option1和Option2的标题分别是“按职工号升序’’和“按职工号降序”。
【正确答案】[操作步骤]   步骤1:单击工具栏中的“新建”按钮,新建-个表单文件,通过表单控件工具栏向表单中添加两个复选框、-个选项组和两个命令按钮,并将“教师表”和“学院表”添加到表单的数据环境中。   步骤2:设置表单的Name属性为m#orm,Caption属性为“教师情况”;设置两个命令按钮的Caption属性分别为。生成表”和“退出”;设置两个复选框的Caption属性分别为。系名”和“工资”;两个单选按钮的Caption属性分别为“按职工号升序”和“按职工号降序”。   步骤3:双击“生成表”按钮,为“生成表”命令按钮编写   Click"事件代码。   *****“生成表”按钮的Click事件代码*****   a=ThisForm.Checkl.Value   b=ThisForm.Cheek2.Value   C=ThisFafm.Olptiongroupp1.Option1.Value   d=TlaisForm.0ptiongroup1.option2.Value   if a=l and b=l   if c=l   select职工号。姓名,系名,工资,课程号from教师表,   学院表;   Where教师表.系号=学院表.系号;   order by职工号;   into tablevtwo.dbf   else   if d=1   sdect职工号,姓名,系名,工资,课程号from教   师表,学院表;   where教师表.系号=学院表.系号;   order by职工号desc;   曲inw n1ldC two.dbf   endif   endif   endif   if a=l andb=0   ifc=l   select职工号,姓名,系名,课程号from教师表,掣   院表;   whem教师表.系号=学院表.系号;   order by职工号;   into table one_x.dbf   else   ifd=l   select职工号,姓名,系名,课程号from教师表,   学院表;   where教师表.系号=学院表.系号;   order by职工号desc;   into table one.x.dbf   endif   endif   endif   if a=O and b=1   ife=1   ∞leet职工号,姓名,工资,课程号from教师表,掣   院表;   where教师表.系号=学院表.系号;   order by职工号;   into talde olle_xx.dbf   else   if d=1   select职工号,姓名,工资,课程号from教师表,   学院表:   where教师表.系号=学院表.系号;   order by职工号desc;   into table one xx.dbf   endif   endif   cndif   **********************   步骤4:保存表单名为myform,按题目要求运行表单并执行相关操作。
【答案解析】