在考生文件夹下设计名为supper的表单(表单名和文件名均为supper),表单的标题为“零件供应情况”。表单中有1个表格控件和2个命令按钮查询和退出。
运行表单时单击查询命令按钮后,表格控件中显示“供应”表工程号为“A1”所使用的零件的“零件名”、“颜色”、和“重量”。并将结果放到表jie中。
单击“退出”按钮关闭表单。
参考答案:在命令窗口中输入命令:CREATE FORM supper,打开表单设计器,通过“常用工具栏”向表单添加 1个表格和2个命令按钮。
选中表单,在属性面板中修改Name的属性值为supper,将Caption的属性值改为“零件供应情况”,然后在属性面板顶端的下拉框中选择Command1,修改该命令按钮控件的Caption属性值为“查询”,以同样的方法将第二个命令按钮设置Caption属性值改为“退出”,如图3-135所示。
[*]
双击命令按钮“查询”,编写该控件的Click事件,程序代码如下:
******命令按钮Command1(查询)的Click事件代码*****
SELECT零件名,颜色,重量;
FROM零件,供应;
WHERE 供应.零件号=零件.零件号AND工程号=’Al’;
DdTO TABLE jie
Thisform.Gridl.RecordSourceType=1
Thisform.Gridl.RecordSource="jie"
*********************************************************
以同样的方法为“退出”命令按钮编写Click事件代码:Thisform.Release。
保存表单完成设计,查看表单运行结果,如图3-136所示。
[*]
解析:本大题考查的是表单设计,在设计控件属性中,不要将控件的标题和名称属性弄混淆,名称属性是该控件的一个内部名称,而标题属性是用来显示的一个标签名称。程序部分属于SQL的简单联接查询。