计算机等级考试二级VFP上机试题及解题思路(27)

　　三、综合应用(1小题，计30分)

　　设计名为mysupply的表单(表单的控件名和文件名均为mysupply)。表单的

　　标题为"零件供应情况"。表单中有一个表格控件和两个命令按钮"查询"(名称为

　　Command1)和"退出"(名称为Command2)。

　　运行表单时,单击"查询"命令按钮后，表格控件(名称grid1)中显示了工程号

　　"J4"所使用的零件的零件名、颜色、和重量。

　　单击"退出"按钮关闭表单。

　　考查知识点：

　　表单的建立，表格控件的使用，SQL查询命令，子查询等

　　解题思路：

　　1.选择“文件”菜单中“新建”命令，在文件类型选择框中选择“表单”，单击“新建文件”按钮

　　2.在表单设计器中设置表单的Name属性为“mysupply”，Caption属性为“零件供应情况”，从控件工具栏中分别选择两个按钮和一个表格放置到表单上，分别设置按钮Command1的Caption属性为“查询”,Command2的Caption属性为“退出”，表格的Name属性为“grid1”，RecordSourceType属性为“0-表”

　　3.在Command1按钮的Click事件中输入：

　　set safety off

　　select 零件名,颜色,重量 from 零件;

　　where 零件号 in ;

　　(select 零件号 from 供应 where 工程号="J4") into table ls

　　&&将查询结果保存在表中

　　thisform.grid1.recordsource="ls"

　　&&设置表格的数据源为查询结果生成的表

　　set safety on

　　4.在Command2按钮的Click事件中输入:Thisform.release，保存表单为mysupply.scx。