问答题
设计名为formbook的表单(控件名为 form1，文件名为 formbook)。表单的标题设为“图书情况统计”。表单中有1个组合框(名称为Combo1)、1个文本框(名称为Text1)和2个命令按钮“统计” (名称为 Command1)和“退出” (名称为Command2)。
运行表单时，组合框中有3个条目“清华”、“北航”、“科学” (只有3个出版社名称，不能输入新的)可供选择，在组合框中选择出版社名称后，如果单击“统计”命令按钮，则文本框显示出“图书”表中该出版社图书的总数。
单击“退出”按钮关闭表单。
运行表单时，组合框中有3个条目“清华”、“北航”、“科学” (只有3个出版社名称，不能输入新的)可供选择，在组合框中选择出版社名称后，如果单击“统计”命令按钮，则文本框显示出“图书”表中该出版社图书的总数。
单击“退出”按钮关闭表单。
【正确答案】
单击“文件”菜单中的“新建”，在类型选择框中选择“表单”，单击“新建文件”按钮，打开表单设计器。
在属性窗口中设置表单form1 的Caption 属性为“图书情况统计”，Name 属性为form1。从表单控件工具栏中选择一个组合框，两个按钮，一个文本框放置在表单上。在属性面板中设置组合框的 RowsourceType属性为“1-值”，RowSource 属性为“清华，北航，科学”，Style 属性为“2-下拉列表框”。设置按钮Command1的Capon属性为“统计”，Command2的Caption属性为“退出”，结果如图3-87所示。
图3-87
双击命令按钮Command1，在Click 事件中编写如下代码。
******命令按钮Command1(统计)的Click 事件*****
SELECT count(*)FROM book WHERE 出版社=Thisform.combo1.value；
INTO array Temp
Thisform.Text1.Value=temp(1)
***********************************************
同样在Command2的Click 事件中输入代码：Thisform. Telease。
保存表单文件为formbook. scx到考生文件下。运行表单，结果如图3-88所示。
单击“文件”菜单中的“新建”，在类型选择框中选择“表单”，单击“新建文件”按钮，打开表单设计器。
在属性窗口中设置表单form1 的Caption 属性为“图书情况统计”，Name 属性为form1。从表单控件工具栏中选择一个组合框，两个按钮，一个文本框放置在表单上。在属性面板中设置组合框的 RowsourceType属性为“1-值”，RowSource 属性为“清华，北航，科学”，Style 属性为“2-下拉列表框”。设置按钮Command1的Capon属性为“统计”，Command2的Caption属性为“退出”，结果如图3-87所示。
图3-87
双击命令按钮Command1，在Click 事件中编写如下代码。
******命令按钮Command1(统计)的Click 事件*****
SELECT count(*)FROM book WHERE 出版社=Thisform.combo1.value；
INTO array Temp
Thisform.Text1.Value=temp(1)
***********************************************
同样在Command2的Click 事件中输入代码：Thisform. Telease。
保存表单文件为formbook. scx到考生文件下。运行表单，结果如图3-88所示。
【答案解析】[解析] 本大题主要考查的是表单中组合框的设置，该控件用来显示数据的重要属性是 RowsourceType和RowSource，在程序设计中，利用SQL语句在数据表中查找与选中条目相符的字段值进行统计，属于简单查询。