Visual FoxPro数据库程序设计
问答题在考生文件夹下，有一表单文件myform.scx。打开该表单文件，然后在表单设计器环境下完成如下操作： （1）在属性窗口中将表单设置为不可移动的，并将其标题设置为“表单操作”。 （2）为表单新建一个名为mymethod的方法，方法代码为：wait "mymethod"window。 （3）设置Ok按钮的Click事件代码，其功能是调用表单的mymethod方法。 （4）设置Cancel按钮的Click事件代码，其功能是关闭当前表单。
题目
相似问题和答案
第1题：
考生文件夹下的自由表employee中存放着职员的相关数据。 1．利用表设计器为employee表创建一个普通索引，索引表达式为“姓名”，索引名为xm。 2．打开考生文件夹下的表单文件formone，然后设置表单的Load事件，代码的功能是打开employee表，并将索引xm设置为当前索引。 3．在表单formone中添加一个列表框，并设置列表框的名称为mylist，高度为60，可以多重选择。 4．设置表单formone中mylist列表框的相关属性，其中RowSourceType属性为字段，使得当表单运行时，列表框内显示employee表中姓名字段的值。
【操作步骤】
(1)打开“employee”表的表设计器，单击“索引”选项卡，在索引名处输入“xm”，类型选择“普通索引”，表达式为“姓名”。
(2)打开表单文件formone．scx，然后设置表单的Load事件代码如下。
useemployee．dbfsetordel"to xm
(3)选中控件工具栏里的“列表框”按钮，在表单设计器中拖动鼠标，这样在表单上得到一个“列表框”对象Listl，设置它的Name属性为“mylist”，Heisht属性为“60”，MultiSelect属性为．T．。
(4)在属性窗口设置mylist列表框的RowSourceType属性为“6一字段”，RowSource属性为“employee．姓名”。
第2题：
（1）在考生文件夹中有“种植信息”表。用SQL语句查询每种品种的“种植品种”、“市场价”、“种植成本”、“数量”和“净收入”，其中“净收入”=每种品种的“市场价”-“种植成本”*“数量”。查询结果按“净收入”升序排序，“净收入”相同的按“种植品种”排序，将结果存放于表“净收入”中，将使用到的SQL代码保存到“result．txt”中。
（2）在考生文件夹下有表“种植信息”，在考生文件夹下设计一个表单“bdl”，表单标题为“种植信息”。该表单为“种植信息”表的窗口输入界面，表单上还有一个标题为“关闭”的按钮，单击该按钮退出表单。
【考点指引】本大题第1小题考查的是SQL，SELECT语句的用法，这里还要用到order BY和INTO TABLE子句；第2小题主要考查表单的创建。
(1)【操作步骤】
①在命令窗口中输入命令：
SELECT种植品种，市场价，种植成本，数量，(市场价一种植成本)*数量AS净收入INTO TABLE净收入FROM种植信息order BY净收入，种植品种(回车执行)
②在考生文件夹下新建文本文件“result．txt”，将输入的命令保存到文本文件“result．txt”中。
(2)【操作步骤】
①选择【文件】→【新建】命令，选择“表单”，单击“新建文件”按钮打开表单设计器，在表单属性窗口中将Caption属性值修改为“种植信息”，单击表单控件工具栏上的“命令按钮”控件图标，为表单添加一个命令按钮Command1。
②在按钮属性窗口中将命令按钮Command1的Caption属性值修改为“关闭”。双击命令按钮，在Click事件中输入代码：ThisForm．Release，用来关闭表单。
③在表单设计器中，鼠标右键单击表单空白处，在弹出的快捷菜单中选择“数据环境”命令，打开表单的数据环境，将数据表文件“种植信息”添加到数据环境中，将数据环境
中的“种植信息”表拖放到表单中，可看到在表单中出现一个表格控件，此时实现了“种植信息”表的窗口式输入界面。
④选择【表单】→【执行表单】命令，系统首先要求保存该表单文件，在弹出的“另存为”对话框中输入表单文件名“bd1”，保存在考生文件夹下，然后运行表单。
第3题：
2
请在考生文件夹下完成如下操作：
（1）在考生文件夹下建立“WORD文档”文件夹；
（2）在考生文件夹下查找“文件操作.doc”文件，将它复制到“WORD文档”文件夹中。
操作提示：
①打开考生文件夹，单击鼠标右键，选择“新建”→“文件夹”，修改新文件夹的默认名称“新建文件夹”为“WORD文档”。
②打开考生文件夹，在上方的工具栏中单击“搜索”按钮，选择“文件或文件夹”命令，打开“搜索”对话框，键入要查找的文件的名字“文件操作.doc”，搜索范围选择考生文件夹所在位置，单击“立即搜索”按钮。
③在“搜索结果”窗口中单击工具栏中的“文件夹”按钮，左窗格显示整个系统的文件夹树，在右窗格显示搜索结果，选择位于考生文件夹下的“文件操作.doc”文件，执行“编辑”→“复制”命令，通过左窗格打开考生文件夹下“WORD文档”文件夹，执行“编辑”→“粘贴”命令。
第4题：
（1）在考生文件夹下有一个数据库“school”，其中“zgxx”表结构如下：
zgxx（职工编号C（4），姓名C（8），性别C（2），工资N（7，2），年龄N（2），职称C（10））
现在要对“zgxx‘’表进行修改，指定“编号”为主索引，索引名和索引表达式均为“职工编号”；指定“职称”为普通索引，索引名和索引表达式均为“职称”；“年龄”字段的有效性规则在18～60之间（含18和60），默认值是30。
（2）在考生文件夹中有数据库“school”，其中有数据库表“zgxx”。在考生文件夹下设计一个表单，该表单为“school”库中“zgxx”表窗口式输入界面，表单上还有一个名为“cmdClose”的按钮，标题名为“关闭”，单击该按钮，使用ThisForm.Release退出表单。最后将表单存放在考生文件夹中，表单文件名是“forml”。
提示：在设计表单时，打开“school”数据库设计器，将“zgxx”表拖入表单中就实现了“zgxx”表的窗口式输入界面，不需要其他设置或修改。
【考点指引】本大题第1小题考查的是数据库中数据的完整性，包括实体完整性及域完整性和约束规则两个方面，这些都是在表设计器中完成的，且只有数据库表才可以进行数据完整性的设置；第2小题中考查的是在表单中设定数掘环境，通过表单的数据环境快速建立表单控件和数据之间的联系。
(1)【操作步骤】
①选择【文件】→【打开】命令，或直接单击工具栏上的“打开”图标，在弹出的“打开”对话框中选择要打开的数据库文件“schoo1．dbc”。
②在数据库设计器中，右键单击数据库表“zgxx”，在弹出的快捷菜单中选择“修改”命令，进入“zgxx”的数据表设计器界面。
③单击“索引”选项卡，将此选项卡中的“索引名”和“索引表达式”均改为“职工编号”，在“索引类型”的下拉列表框中，选择“主索引”。
④再单击下一行增加新的索引，将此选项卡中的“索引名”和“索引表达式”均改为“职称”，在“索引类型”下拉列表框中，选择“普通索引”。
⑤单击“字段”选项卡，选择“年龄”字段，在“字段有效性”信息框中，“规则”输入：“年龄=>18．OR．年龄<=60”，“默认值”输入“30”。
⑥单击“确定”按钮，保存“zgxx”表结构。
(2)【操作步骤】
①选择【文件】→【新建】命令，选择“表单”，单击“新建文件”按钮打开表单设计器，单击表单控件工具栏上的“命令按钮”控件图标，为表单添加一个命令按钮Command1。
②在按钮属性窗口中将命令按钮Command1的Name属性值修改为“cmdClose”，将Caption属性值修改为“关闭”。双击命令按钮，在Click事件中输入代码：ThisForm．Release，用来关闭表单。
③在表单设计器中，鼠标右键单击表单空白处，在弹出的快捷菜单中选择“数据环境”命令，打开表单的数据环境，将数据表文件“zgxx”添加到数据环境中，将数据环境中的“zgxx”表拖放到表单中，可看到在表单中出现一个表格控件，此时实现了“zgxx”表的窗口式输入界面。
④选择【表单】→【执行表单】命令，在弹出的“另存为”对话框中输入表单名“forml”，保存在考生文件夹下，然后运行表单。
第5题：
在考生文件夹下，有一个名为myform的表单。打开表单文件，然后在表单设计器中完成下列操作： 1．将表单设置为不可移动，并将其标题修改为“表单操作”。 2．为表单新建一个名为mymethod的方法，方法代码为：wait”mymethod”window 3．编写OK按钮的Click事件代码，其功能是调用表单的mymethod方法。 4．编写Cancel按钮的Click事件代码，其功能是关闭当前表单。
【操作步骤】
(1)打开表单，在属性窗口将表单的Movable属性修改为．F．并将其Caption属性设置为“表单操作”。
(2)在系统菜单中的“表单”菜单中选择“新建方法程序”打开“新建方法程序”对话框，然后在名称框中输入“mymeth-od”并单击“添加”按钮，关闭对话框后双击表单空白处，编写表单的mymethod事件代码如下：wait“mymethod’’window
(3)双击打开0K按钮的Click事件，输入：ThisForm．mymethod
(4)双击打开Cancel按钮的Click事件，输入：ThisForm．Release
第6题：
在考生文件夹下存在表单文件myform．scx，其中包含一个名为“高度”的标签、一个文本框Text1，以及一个名为“确定”的命令按钮。打开该表单文件，然后在表单设计器环境下完成如下操作。 1．将标签、文本框和命令按钮3个控件设置为顶边对齐。 2．修改“确定”按钮的相关属性，使得在表单运行时按Enter键就可以直接选择该按钮。 3．设置表单的标题为“表单操作”、名称为myform。 4．编写“确定”按扭的Click事件代码，使得表单运行时，单击该按钮可以将表单的高度设置成在文本框中指定的值。
(1)打开表单myform，按Shift选中3个控件，在菜单中选择“格式”一“对齐”一“顶边对齐”命令。
(2)选中“确定”按钮，在属性窗中找到属性DEFAULT，把它设置为．T．。
(3)选中表单，将其Name属性改为myform，Caption属性改为：表单操作。
(4)双击“确定”按钮，在Click事件里写入如下代码：ThisForm．Height=val(ThisForm．Textl．value)
第7题：
用SQL语句完成下列操作：检索“田亮”所借图书的书名、作者和价格，结果按价格降序存入book_temp表中。 2．在考生文件夹下有一个名为menu_lin的下拉式菜单，请设计一个名为form_menu的顶层表单，将菜单 menu_lin加入到该表单中，使得运行时菜单显示在该表单中，并且，表单退出时释放菜单。
(1)【操作步骤】
在命令窗口中输入如下查询语句，输入完成后按回车键即可。
SELECT Book．书名，Book．作者，Book．价格；
FROM book，loans，borrows；
WHERE Loans．借书证号=Borrows．借书证号；
AND Book．图书登记号=Loans．图书登记号；
AND Borrows．姓名=“田亮”；
ORDER BY Book．价格DESC；
INTO TABLE book_temp．dbf
(2)【操作步骤】
步骤1：单击工具栏中的“打开”按钮，在“打开”对话框中选择考生文件夹下的menu_lin．mnx文件，单击“确定”按钮。选择“显示”菜单下的“常规选项”命令，在“常规选项”对话框中选择“顶层表单”复选框。
步骤2：在命令窗口输入命令create form. form_menu，新建表单form_menu，设置表单的ShowWindow属性为“2-作为顶层表单”
步骤3：双击表单空白处，打开代码编辑窗口，选择表单对象的Init事件，输入以下代码：
DO menu_lin．mpr With This，”abc”
再选择表单对象的Destroy事件，输入以下代码：
Release Menu abe Extended
步骤4：单击工具栏上的“保存”按钮，最后单击“运行”按钮实现操作。
第8题：
（1）首先打开考生文件夹下的数据库“school”，然后使用表单向导制作一个表单，要求选择“student”表中所有字段，表单样式为“阴影式”，按钮类型为“图片按钮”，排序字段选择“学号”（升序），表单标题为“学生信息数据输入维护”，最后将表单存放在考生文件夹中，表单文件名为“bd1”。
（2）在考生文件夹下有一个数据库“school”，其中数据库表“student”存放学生信息，使用菜单设计器制作一个名为“cd1”的菜单，菜单包括“数据维护”和“文件”两个菜单栏。每个菜单栏都包括一个子菜单。菜单结构如下：
数据维护
数据表格式输入
文件
退出
其中，数据表格式输入菜单项对应的过程包括下列四条命令：打开数据库“school”的命令，打开表“student”的命令，浏览表“student”的命令，关闭数据库的命令。
退出菜单项对应的命令为SET SYSMENU TO DE-FAULT，用于返回系统菜单。
【考点指引】本大题第1小题考查的是表单向导的使用，只要根据每个向导界面的提示来完成相应的步骤即可；第2小题主要考查菜单设计器的使用及子菜单过程的建立。
(1)【操作步骤】
①选择【文件】→【打开】命令，打开数据库“school”。
②选择【文件】→【新建】命令，选择“表单”，单击“向导”按钮，在弹出的“向导选取”窗口中选择“表单向导”，单击“确定”按钮。
③在“表单向导”对话框中的“数据库和表”列表框中选择“student”数据表，将“可用字段”下的全部字段添加到“选定字段”列表框中，单击“下一步”。
④在“样式”列表框中选择“阴影式”，“按钮类型”选择“图片按钮”，单击“下一步”按钮。
⑤在“可用的字段或索引标识”列表框中选择“学号”添加到“选定字段”列表框中，选择“升序”，单击“下一步”。
⑥输入表单标题为“学生信息数据输入维护”，单击“完成”按钮，输入表单名称“bd1”并保存退出。
(2)【操作步骤】
①选择【文件】→【新建】命令，选择“菜单”，单击“新建文件”按钮，再单击“菜单”按钮，打开菜单设计器，在“菜单名称”中输入“数据维护”，在“结果”下拉列表框中选择“子菜单”，单击下一行，在“菜单名称”中输入“文件”，在“结果”下拉列表框中选择“子菜单”。
②在菜单设计器中单击选定菜单名称下刚创建的“数据维护”行，单击“创建”按钮创建“数据维护”子菜单，输人子菜单名称“数据表格式输入”，在“结果”下拉列表框中选择“过程”，单击“创建”按钮创建“数据表格式输入”子菜单过程。
“数据表格式输入”子菜单过程代码：
OPEN DATABASE school
USE student
BROWSE
CLOSE DATABASE
③在菜单设计器左边的“菜单级”下拉列表框中选择“菜单栏”返回到主菜单设计画面，单击菜单名称下的“文件”行，单击“创建”按钮创建“文件”子菜单，输入子菜单名称“退出”，在“结果”下拉列表框中选择“命令”，在“选项”处输入“退出”命令：SET SYSMENU TO DEFAULT。
④选择【菜单】→【生成】命令，将菜单保存为“ed1”，生成一个菜单文件“cd1．mpr”。关闭菜单设计窗口，在命令窗口输入命令：IX)cd1．mpr，看到Visual FoxPr0的菜单栏被新建的菜单所代替，选择【文件】→【退出】命令将恢复系统菜单。
第9题：
对考生文件夹下的“student”表、“course”表和“score”表f进行如下操作：
（1）用SQL语句查询“成绩”在80分以上（包括80分）的学生姓名，并将结果按学号升序存入表文件“resuh.dbf”中，将SQL语句保存在考生文件夹下的“result.txt”文本中。
（2）使用表单向导制作一个表单。要求：选择“student”表中的全部字段，表单样式为“彩色式”，按钮类型为“文本按钮”，排序字段选择“学号”（升序），表单标题为“学生信息浏览”，最后将表单保存为“bd1”。
【考点指引】本大题第1小题考查了SQL多表查询，设计过程中关键要注意多个表之间进行关联的字段，注意用INTO TABLE将查询结果保存到数据表中；第2小题考查的是表单向导的使用。
(1)【操作步骤】
①在命令窗口中输入命令：
SELECT姓名INTO TABLE result FROM student，score WHERE student．学号=score．学号AND成绩>=80 ORDER BY student．学号(回车执行)
②在考生文件夹下新建文本文件“result”，将步骤①输入的命令复制到“result”中并保存。
(2)【操作步骤】
①选择【文件】→【新建】命令，选择“表单”，单击“向导”按钮，在弹出的“向导选取”窗口中选择“表单向导”，单击“确定”按钮。
②在“表单向导”窗口中的“数据库和表”列表框中选择“school”数据库和“student”数据表，将“可用字段”下的全部字段添加到“选定字段”列表框中，单击“下一步”按钮。
③在“样式”列表框中选择“彩色式”，“按钮类型”选择“文本按钮”，单击“下一步”按钮。
④在“可用的字段或索引标识”列表框中选择“学号”添加到“选定字段”列表框中，选择“升序”，单击“下一步”按钮。
⑤输入表单标题为“学生信息浏览”，单击“完成”按钮，输入表单名称“bd1”并保存退出。
第10题：
（1）用SQL语句完成下列操作：检索“读者丙”所借图书的书名、作者和价格，结果按价格降序存入“result”表中，将SQL语句保存在“exl.prg”中。
（2）在考生文件夹下有一个名为“cd1”的下拉式菜单，请设计顶层表单“bd1”，将菜单“cd1”添加到该表单中，使得运行表单时菜单显示在本表单中，并在表单退出时释放菜单。
【考点指引】本大题第l小题考查的是SQL SELECT语句的使用；第2小题考查了顶层表单的设计，重点是在顶层表单中调用下拉式菜单的基本步骤。
(1)【操作步骤】
①在命令窗口中输人命令：MODICOMM cx1(回车执行)，打开程序文件编辑窗口，在程序文件编辑窗口中输入以下程序代码：
SELECT书名，作者，价格INTO TABLE result FROM图书信息WHERE条码号IN(SELECT条码号FROM图书借阅，读者信息WHERE图书借阅．借书证号＝读者信息．借书证号AND姓名＝〝读者丙〞)ORDER BY价格DE－SC
关闭程序文件编辑窗口并保存程序文件。
②在命令窗口中输人命令：DO cx1(回车执行)，执行程序文件。
(2)【操作步骤】
①选择【文件】→【新建】命令，选择“表单”，单击“新建文件”按钮打开表单设计器，在表单属性窗口中将“Show－WinDO w”属性值修改为“2”。
②在表单属性窗口中双击“InitEvent”，打开Init事件代码编辑窗口，输入以下过程代码：
DO cd1．mpr WITH This，〝cd1〞
③在表单属性窗口中双击“DestroyEvent”，打开De－stroy事件代码编辑窗口，输入以下过程代码：
RELEASFMENU cd1
④选择【表单】→【执行表单】命令，系统首先要求保存该表单文件，在弹出的“另存为”对话框中输入表单文件名“bd1”，保存在考生文件夹下，然后运行表单。