应用题

设计名为 form. book 的表单(控件名为 forml, 文件名为 form_book)。 表单的标题设为“图书情况统计”。 表单中有一个组合框. (名称为 Combol)、 一个文本框(名称为 Textl)和两个命令按钮“统计” (名称为 Commandl)和“退出” (名称为 Command2)。 
运行表单时, 组合框中有三个条目“清华”、“北航”、“科学” (只有三个出版社名称, 不能输入新的)可供选择, 在组合框中选择出版社名称后, 如果单击“统计” 命令按钮, 则文本框显示出“图书” 表中该出版社图书的总数。
单击“退出” 按钮关闭表单。
注意: 完成表单设计后要运行表单的所有功能。

【正确答案】

步骤 1: 在命令窗口执行命令: CREATE FORM form_book, 打开表单设计器新建表单。 从“表单控件” 工具栏中依次向表单添加一个组合框、 一个文本框及两个命令按钮控件。
步骤 2: 在“属性” 面板的下拉框中选择表单对象, 在“全部” 选项卡中修改对象属性值。
步骤 3: 双击命令按钮, 编写各个命令按钮的 Click 事件代码。 各按钮代码如下:
*****“统计” 按钮的 Click 事件代码*****
SELECT COUNT(*)FROM BOOK WHERE 出版社
=THISFORM. COMBO 1. DISPLAYVALUE;
INTOARRAYTEMP
THISFORM. TEXT1. VALtJE=TEMP(1)
*****“退出” 按钮的 Click 事件代码*****
THISFORM.RELEASE
步骤 4: 单击“常用” 工具栏中的“运行” 按钮查看结果, 将表单文件保存到考生文件夹下。

【答案解析】

本大题考查了表单及控件的常用属性和方法的设置; SQL 简单查询。
本题的关键是“统计” 命令按钮的 click 事件的编写, 可以根据组合框中选择的“出版社”名称, 从 book 表中查找到该出版社图书的总数, 这里求总数用 count()函数, 组合框中的当前值用 Value 属性来表示, 并将求出的总数存放到数组中, 然后再将数组中的值赋给文本框的 value 值(即文本框中显示的内容)。