有关程序的题目解析1.docxVIP

【操作步骤】步骤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 ppThisForm.Grid1.RecordSource=pp再双击退出命令按钮，并输入：THISFORM.RELEASE 步骤4：单击工具栏中的保存按钮，在另存为对话框中输入表单名mysupply，单击保存按钮。步骤5：单击工具栏中的运行按钮，在文本框中输入J4，并单击查询命令按钮。1)【操作步骤】步骤1：单击工具栏中的新建按钮，在新建对话框中选在文件类型中的程序，单击新建文件按钮。步骤2：在程序窗口中输入以下语句：SELECT 供应.供应商号,供应.工程号,供应.数量;FROM 零件,供应 WHERE 供应.零件号=零件.零件号;AND 零件.颜色=红;ORDER BY 供应.数量 desc;INTO DBF supply_temp步骤3：单击工具栏中的保存按钮，在另存为对话框中输入文件名query1,再单击保存按钮。最后单击工具栏中的运行按钮。(2)【操作步骤】步骤1：单击工具栏中的新建按钮，在新建对话框中选择文件类型选项组中的菜单，单击新建文件按钮，在弹出的新建菜单对话框中选择快捷菜单。步骤2：在快捷菜单设计器中的菜单名称中分别输入两个菜单项查询和修改。单击工具栏中的保存按钮，在另存为对话框中输入menu_quick，单击保存按钮。步骤3：单击菜单菜单中的生成命令，在生成菜单对话框中单击生成按钮。步骤4：单击工具栏中的打开按钮，在打开对话框中选择考生文件下的myform.scx文件，并单击确定按钮。然后双击表单设计器打开代码窗口，在对象中选择form1，在过程中选择 RightClick，输入代码：do menu_quick.mpr，保存表单。步骤5：单击工具栏中的运行按钮，运行该表单。第六套题【操作步骤】(1)打开Visual FoxPro，在命令窗口输入： INSERT INTO 零件信息 VALUES(p7,PN7,1020)并按回车键执行语句。然后单击工具栏中的新建按钮，创建一个程序文件one.prg，将上述代码复制到该文件中并保存。(2)在命令窗口输入：DELE FROM 零件信息 WHERE 单价600并按回车键执行语句。然后单击工具栏中的新建按钮，创建一个程序文件two.prg，将上述代码复制到该文件中并保存。(3)在命令窗口输入： UPDATE 零件信息 SET 单价=1090 WHERE 零件号=p4并按回车键执行语句。然后单击工具栏中的新建按钮，创建一个程序文件three.prg，将上述代码复制到该文件中并保存。(4)打开菜单mymenu.mnx后，选择系统菜单中的菜单，然后选择生成命令。1)【操作步骤】单击工具栏中的打开按钮，打开考生文件夹下的程序文件modi1.prg，并按题目的要求进行改错，修改完成后保存并运行程序文件。***********程序提供的代码***********SELECT 零件名称 FROM 零件信息 WHERE 零件号 = ;(SELECT 零件号 FROM 使用零件;GROUP BY 项目号 HAVING COUNT(项目号) = 3) ;ORDER BY 零件名称 ;INTO FILE results************************************其中，第1行中的=需改为IN；第3行中的GROUP BY 项目号需改为GROUP BY 零件号；第5行中的INTO FILE需改为TO FILE。(2)【操作步骤】步骤1：在命令窗口输入：Create form formone，按下回车键建立一个表单，通过表单控件工具栏按题目要求为表单添加控件。在属性对话框中，设置表单的Name属性为formone，设置其Caption属性为简单应用；设置标签的Caption属性为项目号；设置命令按钮的属性为确定。步骤2：双击命令按钮，编写其Click事件代码如下：x=thisform