对考生文件夹中的“工资管理”数据库完成如下综合应用。设计一个文件名和表单名均为myf的表单。表单的标题设为“工资发放额统计”。表单中有1个组合框、2个文本框和1个命令按钮“关闭”。 运行表单时，组合框中有“部门信息”表中的“部门号”可供选择，选择某个“部门号”以后，第一个文本框显示出该部门的“名称”，第二个文本框显示应该发给该部门的“工资总额”。单击“关闭”按钮关闭表单。
【正确答案】正确答案：单击“文件”菜单中的“新建”，在类型选择框中选择“表单”，单击“新建文件”按钮，打开表单设计器。在属性窗口中设置表单的Caption 属性为“工资发放额统计”，Name 的属性值改为myf。从“表单控件”工具栏中选择1个组合框，2个文本框，1个命令按钮放置在表单上。在属性面板中设置命令按钮的 Caption 属性为“关闭”，组合框的 RowSourceType 属性为“1-值”，RowSource 属性为“01，02，03，04，05”， Style属性为“2-下拉列表框”。结果如图3-81所示。1.jpg)
图3-81 双击组合框，在其Valid 事件中输入以下代码： ******组合框Combo1 的Valid 事件代码*************** Select 部门名from 部门信息where 部门号=Thisform.combo1.value into array temp Thisform.Text1.Value=temp(1) Select sum(工资)from 工资 where 部门号=This fotm.combo1.value into array temp2 Thisform.Text2.Value=temp2(1) ************************************************** 以同样的方法为“关闭”命令按钮编写Click 事件代码：Thisform. Release。 保存表单文件为myf. scx 到考生文件夹下。表单运行结果如图3-82所示。2.jpg)
图3-81 双击组合框，在其Valid 事件中输入以下代码： ******组合框Combo1 的Valid 事件代码*************** Select 部门名from 部门信息where 部门号=Thisform.combo1.value into array temp Thisform.Text1.Value=temp(1) Select sum(工资)from 工资 where 部门号=This fotm.combo1.value into array temp2 Thisform.Text2.Value=temp2(1) ************************************************** 以同样的方法为“关闭”命令按钮编写Click 事件代码：Thisform. Release。 保存表单文件为myf. scx 到考生文件夹下。表单运行结果如图3-82所示。【答案解析】解析：本大题主要考查的是表单中组合框的设置，该控件用来显示数据的重要属性是RowsourceType和 RowSource，在程序设计中，利用SQL语句在数据表中查找与选中条目相符的字段值。