设计一个名为mysupply的表单,表单的控件名和文件名均为mysupply。表单的形式如下图所示。 表单标题为"零件供应情况",表格控件为Grid1,命令按钮"查询"为Command1、"退出"为Command2,标签控件 Label1 和文本

admin2013-04-27  42

问题 设计一个名为mysupply的表单,表单的控件名和文件名均为mysupply。表单的形式如下图所示。
   
表单标题为"零件供应情况",表格控件为Grid1,命令按钮"查询"为Command1、"退出"为Command2,标签控件 Label1 和文本框控件Text1(程序运行时用于输入工程号)。
运行表单时,在文本框中输入工程号,单击"查询"命令按钮后,表格控件中显示相应工程所使用的零件的零件名、颜色和重量(通过设置有关"数据"属性实现),并将结果按"零件名"升序排序存储到pp.dbf文件。
单击"退出"按钮关闭表单。
完成表单设计后运行表单,并查询工程号为"J4"的相应信息。

选项

答案【操作步骤】 步骤1:单击工具栏中的"新建"按钮,在"新建"对话框中选择"文件类型"选择组中的"表单",单击"新建文件"按钮。 步骤2:在表单设计器中设置表单的Name属性为mysupply,Caption属性为"零件供应情况",从控件工具栏中分别选择一个表格、一个标签、一个文本框和两个命令按钮放置到表单上,分别设置标签label1的Caption属性为"工程号",命令按钮Command1的Caption属性为"查询",Command2的Caption属性为"退出",表格的Name属性为"grid1",RecordSourceType属性为"0-表"。 步骤3:双击"查询"命令按钮,并输入如下代码: Select 零件.零件名,零件.颜色 ,零件.重量; From 供应,零件; Where 零件.零件号=供应.零件号 and 供应.工程号=thisform.text1.value; Order By 零件名; Into dbf pp ThisForm.Grid1.RecordSource="pp" 再双击"退出"命令按钮,并输入:THISFORM.RELEASE 步骤4:单击工具栏中的"保存"按钮,在"另存为"对话框中输入表单名mysupply,单击"保存"按钮。 步骤5:单击工具栏中的"运行"按钮,在文本框中输入J4,并单击"查询"命令按钮。

解析
转载请注明原文地址:https://kaotiyun.com/show/grsp777K
0

最新回复(0)