【第八套:】(略)

【第九套:】设计名为mysupply的表单（文件名和控件名均为mysupply）.表单的标题为”零件供应情况”,表单中有查询和退出两个名令按钮，运行表单时，单击查询，表格中显示工程号“J4”所使用的零件名，颜色和重量。退出时退出表单。

查询命令按钮的click代码：

thisform.grid1.recordsource=[select 零件名, ;

颜色,重量 from 供应,零件 where ;

供应.零件号=零件.零件号 and 工程号="J4" ;

into cursor ss]

退出命令按钮的click代码：

thisform.release

【第十套:】表单结果如下图所示:

建菜单过程省略，其中过程代码如下：

小家电过程代码：myform.grid1.recordsource=[select products.* from products,category where products.分类编码=category.分类编码 and 分类名称="小家电" into cursor tt]

饮料过程代码：myform.grid1.recordsource=[select products.* from products,category where products.分类编码=category.分类编码 and 分类名称="饮料" into cursor tt]

酒类过程代码：myform.grid1.recordsource=[select products.* from products,category;where products.分类编码=category.分类编码 and 分类名称="酒类" into cursor tt]

退出菜单过程代码：myform.release

set sysm to default

【第十一套:】（略）

【第十二套:】（略）

【第十三套:】创建表单form,其中有录取和退出两个命令按钮，单击录取按钮，查询总成绩大于330的考生的考生号考生号,姓名,性别,单位, 政治成绩，外语成绩，高数成绩，专业课成绩并将结果存在表four中,单击退出退出表单.

*录取研究生click事件代码：

select ksb.考生号,姓名,性别,单位,成绩 as 政治成绩 from ksb,kscjb,dm where ;

ksb.考生号=kscjb.考生号 and kscjb.考试科目=dm.考试科目 and 考试科目名="政治" into dbf aa

select ksb.考生号,姓名,性别,单位,成绩 as 外语成绩 from ksb,kscjb,dm where ;

ksb.考生号=kscjb.考生号 and kscjb.考试科目=dm.考试科目 and 考试科目名="外语" into dbf bb

select ksb.考生号,姓名,性别,单位,成绩 as 高数成绩 from ksb,kscjb,dm where ;

ksb.考生号=kscjb.考生号 and kscjb.考试科目=dm.考试科目 and 考试科目名="高等数学" into dbf cc

select ksb.考生号,姓名,性别,单位,成绩 as 专业课成绩 from ksb,kscjb,dm where ;

ksb.考生号=kscjb.考生号 and kscjb.考试科目=dm.考试科目 and 考试科目名="专业课" into dbf dd

select aa.*,外语成绩,高数成绩,专业课成绩,(政治成绩+外语成绩+高数成绩+专业课成绩) as 总成绩 from

aa,bb,cc,dd where aa.考生号=bb.考生号 and bb.考生号=cc.考生号 and cc.考生号=dd.考生号_ into dbf ee

上一页下一页