问答题
在
下完成下列操作：
(1)建立一个文件名和表单名均为oneform的表单，表单中包括两个标签(Label1和Label2)、一个选项组(Optiongroup1)、一个组合框(Combo1)和两个命令按钮(Command1和Command2)，Label1和Label2的标题分别为“系名”和“计算内容”，选项组(Optiongroup1)中有两个选项按钮option1和option2，标题分别为“平均工资”和“总工资”，Command1和Command2的标题分别为“生成”和“退出”，如下图所示。
(1)建立一个文件名和表单名均为oneform的表单，表单中包括两个标签(Label1和Label2)、一个选项组(Optiongroup1)、一个组合框(Combo1)和两个命令按钮(Command1和Command2)，Label1和Label2的标题分别为“系名”和“计算内容”，选项组(Optiongroup1)中有两个选项按钮option1和option2，标题分别为“平均工资”和“总工资”，Command1和Command2的标题分别为“生成”和“退出”，如下图所示。
【正确答案】
【答案解析】[微步骤]
步骤1：打开College数据库，在命令窗口中输入“CREATE FORM oneform”，按下Enter键新建一个表单。然后在表单上添加两个标签、一个选项组、一个组合框和两个命令按钮，并进行适当的布置和大小调整。
设置表单的Name属性为oneform，Label1的Caption属性为“系名”，Label2的Caption属性为“计算内容”，Command1的Caption属性为“生成”，Command2的Caption属性为“退出”，组合框的RowSourceType属性为“6-字段”、RowSource属性为“学院表.系名”，两个选项按钮的Caption属性分别为“平均工资”和“总工资”。
步骤2：右击表单空白处，选择“数据环境”命令，将“学院表”和“教师表”添加到数据环境设计器中。
双击命令按钮，编写两个命令按钮的Click事件代码。
******“生成”按钮的Click事件代码*******
x=thisform.combo1.value
if thisform.optiongroup1.value=1
SELECT学院表.系名，学院表.系号，AVG(教师表.工资)AS平均工资;
FROM college!学院表INNER JOIN college!教师表;
ON 学院表.系号=教师表.系号;
WHERE学院表.系名=x;
GROUP BY学院表.系号;
INTO TABLE salary.dbf
else
SELECT学院表.系名,学院表.系号, SUM(教师表.工资)AS总工资;
FROM college!学院表INNER JOIN college!教师表;
ON 学院表.系号=教师表.系号;
WHERE学院表.系名=x;
GROUP BY学院表.系号;
INTO TABLE salary.dbf
Endif
***************************************
******“退出”按钮的Click事件代码*****
ThisForm.Release
***************************************
步骤3：保存表单，并按题目要求运行。
答案考生文件夹
步骤1：打开College数据库，在命令窗口中输入“CREATE FORM oneform”，按下Enter键新建一个表单。然后在表单上添加两个标签、一个选项组、一个组合框和两个命令按钮，并进行适当的布置和大小调整。
设置表单的Name属性为oneform，Label1的Caption属性为“系名”，Label2的Caption属性为“计算内容”，Command1的Caption属性为“生成”，Command2的Caption属性为“退出”，组合框的RowSourceType属性为“6-字段”、RowSource属性为“学院表.系名”，两个选项按钮的Caption属性分别为“平均工资”和“总工资”。
步骤2：右击表单空白处，选择“数据环境”命令，将“学院表”和“教师表”添加到数据环境设计器中。
双击命令按钮，编写两个命令按钮的Click事件代码。
******“生成”按钮的Click事件代码*******
x=thisform.combo1.value
if thisform.optiongroup1.value=1
SELECT学院表.系名，学院表.系号，AVG(教师表.工资)AS平均工资;
FROM college!学院表INNER JOIN college!教师表;
ON 学院表.系号=教师表.系号;
WHERE学院表.系名=x;
GROUP BY学院表.系号;
INTO TABLE salary.dbf
else
SELECT学院表.系名,学院表.系号, SUM(教师表.工资)AS总工资;
FROM college!学院表INNER JOIN college!教师表;
ON 学院表.系号=教师表.系号;
WHERE学院表.系名=x;
GROUP BY学院表.系号;
INTO TABLE salary.dbf
Endif
***************************************
******“退出”按钮的Click事件代码*****
ThisForm.Release
***************************************
步骤3：保存表单，并按题目要求运行。
答案考生文件夹