【考点指引】本大题考查的是表单的设计及表格控件的使用,注意表格控件数据源的设置。 【操作步骤】 ①选择【文件】→【打开】命令打开数据库“产品”。 ②选择【文件】→【新建】命令,选择“表单”,单击“新建文件”按打开表单设计器,单击表件工具栏上的“命令按”控件图标,为表单添加一个命令按Commandl;单击表件工具栏上的“表格”控件图标,再添加两个表格控件“Grid1”和“Grid2”。 ③选择命令按,在按属性窗口中将命令按Corn-mand1的Name属性值修改为“cmdClose”,将Caption属性值修改为“关闭”。“关闭”命令按,在Click事件中输入代码:ThisForm.Release,用来关闭表单。 ④在表单设计器中,用鼠标右键单击表单空白处,在弹出的快捷选择“数据环境”命令,打开表单的数据环境,选择数据库“产品”,将数据表文件“产品”和“零件”添加到数据环境中,如图10-1所示。 ⑤选择表格控件“Gridl”,在表格控件属性窗口中将“RecordSource”属性值修改为“零件”。将“RecordSource~Type”属性值修改为“0”,将“Read()nly”属性值修改为“.T.”;选择表格控件“Grid2”,在表格控件属性窗口中将“RecordSource”属性值修改为“”””,将“RecordSourceType”属性值修改为“1”。 ⑥在表单设计器中,选择“Grid1”,在属性窗口中“AherRowColChange Event”,弹出事件过程代码编辑窗口,输入以下代码: SELECT产品.*INT()CURS()R tmp FR()M产品wHERE产品.零件编号=ThisForm.gridl.columns(1). textl.value ThisForm.Grid2.RecordSourceType=1 ThisForm.Grid2.ReeordSouree=”trap” ThisForm.Grid2.Refresh -⑦选择【表单】→【执行表单】命令,系统首先要求保存该表单文件,在弹出的“另存为”对话框中输入表单文件名“bd3”,保存在考生文件夹下,然后运行表单。