建立满足如下要求的应用并运行，所有控件的属性必须在表单设计器的属性窗口中设置：
建立一个表单“bd2”，其中包含两个表格控件，第一个表格用于显示表“客户”中的记录，第二个表格用于显示与表“客户”中当前记录对应的“0rder_m”表中的记录。要求两个表格尺寸相同、垂直对齐。
建立一个菜单“cd1”，该菜单只有一个菜单项“关闭”，该菜单项对应于一个过程，并且含有两条语句，第一条语句是关闭表单“bd2”，第二条语句是将菜单恢复为默认的系统菜单。
在“bd2”的Load事件中执行生成的菜单程序“cd1．mpr”。

【考点指引】本大题主要考查表单的建立及表格控件的使用，重点是表格控件数据源的设置，以及在表单中如何实现调用菜单。
【操作步骤】
①选择【文件】→【新建】命令，选择“菜单”，单击“新建文件”按钮，再单击“菜单”按钮，打开菜单设计器，在“菜单名称”中输入“关闭”，“结果”下拉列表框中选择“过程”，单击“创建”按钮，在过程代码编辑窗口中输入两行代码：
_screen．ActiveForm．Release
SET SYSMENU TO DEFAULT
然后关闭过程代码编辑窗口。
②选择【菜单】→【生成】命令，将菜单保存为“cd1”，生成一个菜单文件“ed1．mpr”，关闭菜单设计窗口。
③选择【文件】→【新建】命令，选择“表单”，单击“新建文件”按钮打开表单设计器，单击表单控件工具栏上的“表格”控件图标，添加两个表格控件，将两个表格设置为尺寸相同并垂直对齐，如图87-1所示。

④在表单属性窗口中双击“Load Event”打开Load事件代码编辑窗口，输入以下代码：
DO cd1．mpr
⑤选择表格控件“Grid2”，在表格控件属性窗口中将“RecordSource”属性值修改为“""”，将“RecordSourceType”属性值修改为“1”；选择表格Grid1，在表格属性窗口中修改“RecordSourceType”属性值为“0”，修改“RecordSource”属性值为“客户”，双击“AfterRowcolchange Event”，弹出事件过程代码编辑窗口，输入以下代码：
SELECT order_m．*INTO CURSOR tmp FROM order_m，客户WHERE order_m．客户编号=客户．客户编号AND客户．客户编号=ThisForm．Grid1．columns
(1)．textl．value
ThisForm．Grid2．RecordSourceType=1
ThisForm．Grid2．RecordSource="trap"
ThisForm．Grid2．ReFresh
⑥选择【表单】→【执行表单】命令，系统首先要求保存该表单文件，在弹出的“另存为”对话框中输入表单文件名“bd2”，保存在考生文件夹下，然后运行表单。