(1)在考生文件夹下建立一个文件名和表单名均为oneform的表单,表单中有一个页框Pageframe1和两个命令按钮Command1(生成)和Command2(退出),Pageframe1中有两个页面(Page1和Page2),标题分别为"系名"和"计算

admin2013-10-25  25

问题 (1)在考生文件夹下建立一个文件名和表单名均为oneform的表单,表单中有一个页框Pageframe1和两个命令按钮Command1(生成)和Command2(退出),Pageframe1中有两个页面(Page1和Page2),标题分别为"系名"和"计算方法",Page1中有一个组合框(Combo1),Page2中有一个选项组(Optiongroup1),选项组(Optiongroup1)中有两个选项按钮,标题分别为"平均工资"和"总工资",如下图所示。
     
(2)将"学院表"添加到表单的数据环境中,然后手工设置组合框(Combo1)的RowSourceType属性为6,RowSource属性为"学院表.系名",程序开始运行时,组合框中可供选择的是"学院表"中的所有"系名"。
(3)为"生成"命令按钮编写程序代码。程序的功能是:表单运行时,根据选项组和组合框中选定的"系名"和"计算方法",将相应"系"的"平均工资"或"总工资"存入自由表salary中,表中包括"系名"、"系号"以及"平均工资"或"总工资"3个字段。
(4)为"退出"命令按钮编写程序。程序的功能是关闭并释放表单。
(5)运行表单,在选项组中选择"总工资",在组合框中选择"通信",单击"生成"命令按钮进行计算。最后,单击"退出"命令按钮结束。

选项

答案【操作步骤】 步骤1:通过"新建"对话框新建一个表单,然后设置表单的Name属性为oneform。 步骤2:右键表单空白处,选择"数据环境"命令,将考生文件夹下的"学院表"添加到表单的数据环境中。 步骤3:为表单添加一个页框控件和两个命令按钮控件,右键单击页框控件,选择"编辑"命令,然后分别在页框的两个页面中添加一个组合框控件和一个选项按钮组控件。 步骤4:设置命令按钮1的Caption属性为"生成",命令按钮2的Caption属性为"退出";页面1的Caption属性为"系名",页面2的Caption属性为"计算方法";选项按钮1的Caption属性为"平均工资",选项按钮2的Caption属性为"总工资",;组合框的RowSourceType 属性为"6-字段",RowSource 属性为 "学院表.系名"。 步骤5:在"生成"命令按钮和"退出"命令按钮中分别输入如下代码。 **********"生成"按钮的Click事件代码********** x = ThisForm.Pageframe1.Page1.combo1.Value if ThisForm.Pageframe1.Page2.Optiongroup1.Value = 1 SELECT 学院表.系名, 学院表.系号, avg(教师表.工资) as 平均工资; FROM 学院表,教师表 ; WHERE 学院表.系号 = 教师表.系号; AND 学院表.系名 = x; GROUP BY 学院表.系号; INTO TABLE salary.dbf else SELECT 学院表.系名, 学院表.系号, sum(教师表.工资) as 总工资; FROM 学院表 ,教师表 ; WHERE 学院表.系号 = 教师表.系号; AND 学院表.系名 = x; GROUP BY 学院表.系号; INTO TABLE salary.dbf Endif ***************************************** 编写"退出"命令按钮的Click事件代码"ThisForm.Release"。 步骤6:以oneform为文件名对表单进行保存,运行表单,在组合框中选择"通信",在选项组中选择总工资单击"生成"按钮,最后单击"退出"按钮。

解析 按要求建立表单并修改属性,写入命令按钮代码。
转载请注明原文地址:https://kaotiyun.com/show/RAop777K
0

最新回复(0)