问答题
设计一个表单名和文件名均为form_item的表单，其中，所有控什的属性必须在表单设计器的属性窗口中设置。表单的标题设为“使用零件情况统计”。表单中有一个组合框(Combol)、一个文本框(Text1)、两个命令按钮“统计”(Commahdi)和“退出”(Command2)。 运行表单时，组合框中有3个条目“s1”、“s2”和“s3”(只有3个，不能输入新的，RowSoureeType的属性为“数组”，Style的属性为“下拉列表框”)可供选择，单击“统计”令按钮后，则文本框显示出该项目所使用零件的金额合计(某种零件的金额=单价*数量)。 单击“退出”按钮关闭表单。 注意：完成表单设计后要运行表单的所有功能。
【正确答案】正确答案：步骤1：按照题目的要求新建表单，表单的新建可以通过常用工具栏中的“新建”按钮米实现(操作步骤在前面的解析中已经讲到)，也可以在命令窗口中输入“Crea Form form_item”，然后按回车键，设置表单的Caption属性为“使用零件情况统计”。 步骤2：从表单控件工具栏向表单添加一个组合框、一个文本框和两个命令按钮，然后在属性窗口中修改各控件的相关属性，如图3．39所示。
步骤3：按照题目的要求设置组合框的数据源，如图3．40所示。
步骤4：分别双击命令按钮“统汁”和“退出”，为它们编写Click事件代码，如图3．41所示。
其中，“统计”按钮的Click事件代码如下。 ******“统计”按钮的Click事件代码****** X=allt(thiSform．combol．value) SELECT SUM(使用零件．数量*零件信息．单价)as je； FROM使用零件情况!使用零件INNER JOIN使用零件情况!零件信息； ON使用零件．零件号=零件信息．零件号； WHERE使用零件．项目号=x into array b thiSform．textl．value=allt(str(b [1])) ******************************************** “退出”按钮的C1ick事件代码如下。 ******“退出”按钮的Click事件代码******* ThisForm．Release ****************************************** 步骤5：保存并运行表单，如图3．42所示。
步骤3：按照题目的要求设置组合框的数据源，如图3．40所示。步骤4：分别双击命令按钮“统汁”和“退出”，为它们编写Click事件代码，如图3．41所示。其中，“统计”按钮的Click事件代码如下。 ******“统计”按钮的Click事件代码****** X=allt(thiSform．combol．value) SELECT SUM(使用零件．数量*零件信息．单价)as je； FROM使用零件情况!使用零件INNER JOIN使用零件情况!零件信息； ON使用零件．零件号=零件信息．零件号； WHERE使用零件．项目号=x into array b thiSform．textl．value=allt(str(b [1])) ******************************************** “退出”按钮的C1ick事件代码如下。 ******“退出”按钮的Click事件代码******* ThisForm．Release ****************************************** 步骤5：保存并运行表单，如图3．42所示。【答案解析】