资源描述
简单应用题第一题在指定文件夹下完成如下简单应用：1.打开表单myform001，把表单（名称为Form1）标题改为“成绩管理系统”(form1 对象的caption 属性设置为“成绩管理系统”,在表单设计器界面中点击表单空白处，使表单为当前对象，然后在属性框中设置caption 的文本为指定的内容，不要输入引号)，将文本“欢迎使用成绩查询系统”（名称为label1 的标签）改为颜色属性值为222,100,50(标签的forecolor 属性)，黑体(标签的fontname 属性设置为黑体)。最后在表单上添加“关闭”（名称为Command1）命令按钮 (Command1 命令按钮的caption 属性设置为“关闭”)，单击此按钮关闭表单（Command1 命令的单击事件程序为：thisform.release）。保存并运行表单。2. 打开表单myform002，表单中已有一个标签（名称为label1），按标签要求完成操作。需要建立二个命令按钮“计算”和“关闭”（名称分别为Command1 和Command2）(Command1命令按钮的caption 属性设置为“计算”，Command2 命令按钮的caption 属性设置为“关闭”，注意题目中添加多个控件的，要严格按题目说明对应控件的名称关系，否则影响得分)，三个文本框（text1、text2、text3），结果放在text3 中，单击“计算”按钮,完成标签要求，单击“关闭”按钮关闭表单（Command2 命令的单击事件程序为：thisform.release）。在text1中输入22，在text2 中输入36，保存并运行表单。注意把三个文本框按钮的属性value 值事先设置为0，使得他们默认接收的数据为数值型，否则无法进行数学计算。其他方法可以处理，但是麻烦些。Command1 计算按钮的单击事件程序：thisform.text3.value=thisform.text1.value+thisform.text2.value注意：完成表单设计后要运行表单的所有功能。第二题在指定文件夹下完成如下简单应用：1.打开表单myform001，把表单（名称为Form1）标题改为“欢迎您”（设置表单的caption），将文本“欢迎您访问系统”（名称为label1 的标签）改为25 号（设置label1 的fontsize）黑体（设置label1 的fontname）。最后在表单上添加“关闭”（名称为Command1）命令按钮（Command1 命令按钮的caption 属性设置为“关闭”），单击此按钮关闭表单（Command1 按钮的单击事件程序为：thisform.release）。保存并运行表单。2.打开表单myform002,在表单上已有二个标签按钮（名称为label1 和label2）,添加两个命令按钮“计算”和“关闭”（名称分别为Command1 和Command2）。一个文本框（名称为text1），一个标签按钮（名称为label3）（1）单击“计算”命令按钮，计算出输入圆半径的圆的面积，圆半径在文本框中输入,圆面积在标签label3 中显示。注意text1 文本框默认数据类型是文本，需要首先设置其value值为0，这样该文本框把接收的数字符号默认就是数值型了，后面的才可以计算圆面积，计算按钮的单击事件程序为：（caption 属性为字符型，所以使用STR 函数转换后赋值）thisform.label3.caption=str(thisform.text1.value)*2*pi(),10,2)（2）单击“关闭”命令按钮关闭表单。（关闭按钮的单击事件程序为：thisform.release）注意：完成表单设计后要运行表单的所有功能。第三题在指定文件夹下完成如下简单应用：1.打开表单myform001，把表单（名称为Form1）背景色改为“100,100,200”（单击表单空白处，然后设置表单的backcolor 属性），将文本“欢迎您访问系统”（名称为label1 的标签）改为20 号（设置label1 的fontsize）黑体（设置label1 的fontname）。最后在表单上添加“关闭”（名称为Command1）命令按钮（Command1命令按钮的caption 属性设置为“关闭”），单击此按钮关闭表单（关闭按钮的单击事件程序为：thisform.release）。保存并运行表单。2.设计一个表单myform002,上有两个标签（名称为label1 和label2）和两个计时器（名称分别为timer1 和timer2）。标签label1 的内容为“学生成绩管理系统”（设置标签1 的caption），字号为20（设置标签1 的fontsize），timer1 事件的时间间隔为20 毫秒（设置timer1 的interval 属性值为20），timer2 事件的时间间隔为1000 毫秒（设置timer2 的interval 属性值为1000），标签2 显示系统时间(设置time2 控件的timer 事件代码为：thisform.Label2.caption=time()，标签1 能够不停的自右向左移动(移动值设置为-2)，当全部移出表单后再由表单右侧重新进入。设置timer1 的timer 事件代码为：if thisform.Label1.left0 thisform.Label1.left=thisform.Label1.left-2 else thisform.Label1.left=thisform.width endif注意：完成表单设计后要运行表单的所有功能。类似操作参见课本P 222 页 示例6-19.第四题在指定文件夹下完成如下简单应用：1.打开表单myform001，把表单（名称为Form1）标题改为“欢迎您”（点击表单空白处，设置其caption 属性为“欢迎您”，注意控件的标题caption 和名称name 不同，前者一般展示在表单界面中，后者一般在程序中使用，相当于变量名字），将文本“成绩处理系统”（名称为label1 的标签）改为25 号（设置label1 的fontsize）、字体颜色为RGB（100,200,100）（设置label1 的forecolor）。最后在表单上添加“关闭”（名称为Command1）命令按钮 (Command1 命令按钮的caption 属性设置为“关闭”)，单击此按钮关闭表单(关闭按钮的单击事件程序为：thisform.release）。保存并运行表单。2.设计一个表单myform002,上有两个命令按钮“输出”和“退出”（名称分别为Command1和Command2）(Command1 命令按钮的caption 属性设置为“输出”，Command2 命令按钮的caption 属性设置为“退出”)。一个文本框（名称为TEXT1）（注意text1 文本框默认数据类型是文本，需要首先设置其value 值为0，这样该文本框的值类型默认就是数值型了，后面才可以输入一个表示成绩的数值）,一个标签（名称为label1）。（1）单击“输出”命令按钮，文本框中输入的学生成绩的等级（在标签中显示），等级划分为：不及格（小于60）、及格（大于等于60 小于70）、良好（大于等于70 小于90）、优秀（大于等于90）,输入其它值则显示“输入错误”。输出按钮Command1 的单击事件程序为：fs=thisform.text1.valuelcaption=if fs100 or fs0 thenlcaption=输入错误elseif fs60 thenlcaption=不及格elseif fs70lcaption=及格elseif fs90lcaption=良好elselcaption=优秀endifendifendifendifthisform.label1.caption=lcaption（2）单击“退出”命令按钮关闭表单(退出按钮的单击事件程序为：thisform.release）。注意：完成表单设计后在文本框中输入65，运行表单的所有功能。第五题在指定文件夹下完成如下简单应用：1.打开表单myform001，把表单（名称为Form1）标题改为“考试系统”（点击表单空白处，设置其caption 属性为“考试系统”），将文本“进入考试系统”（名称为label1 的标签）改为20 号黑体（设置label1 的fontsize 属性）。最后在表单上添加“关闭”（名称为Command1）命令按钮（设置其caption 属性为“关闭”），单击此按钮关闭表单（退出按钮的单击事件程序为：thisform.release）。保存并运行表单。2.设计一个表单myform002,表单上有一个标签“请输入密码”（在新建的表单上添加一个标签控件，设置其caption 属性为“请输入密码”)和一个文本框（名称分别为label1 和text1）。输入密码时文本框中显示“*”(设置文本框控件text1 的passwordchar 属性为*，设置其controlsource 属性为newpassword )，输入错误显示提示信息“密码输入不正确，第几次输入失败！”,三次输入不正确时，则显示提示信息“对不起，您不是合法用户！”，输入密码正确，则显示“密码正确，进入系统！”，然后结束表单运行。（inputnumber 存放输入次数， oldpassword=123 ,newpassword 存放输入密码注意：完成表单设计后要运行表单的所有功能。建立新表单，保存表单文件名字为myform002，设置表单的init event 事件代码如下:public inputnumber,oldpassword,newpasswordinputnumber=0oldpassword=123newpassword=文本框控件text1 的valid event 事件代码为：if newpassword!=oldpasswordinputnumber=inputnumber+1=messagebox(密码输入不正确，第+str(inputnumber,1)+次输入失败)if inputnumber3newpasssword=this.value=thisform.refreshreturn .f.else=messagebox(对不起，您不是合法用户！)release inputnumber,oldpassword,newpasswordthisform.releaseendielsemessagebox(密码正确，进入系统！)release inputnumber,oldpassword,newpasswordthisform.releaseendi程序中设定的原始密码为123，运行时输入完成后直接回车即可。可参见课本P195 例6-4第六题在指定文件夹下完成如下简单应用：1.打开表单myform001，把表单（名称为Form1）标题改为“欢迎您”，将文本“欢迎您访问系统”（名称为label1 的标签）改为25 号。标签背景色改为100,80,200，最后在表单上添加“关闭”（名称为Command1）命令按钮，单击此按钮关闭表单。保存并运行表单。2.设计一个表单myform002,表单上有两个命令按钮“计算”和“退出”（名称分别为Command1和Command2），二个标签（名称为label1，内容为“输入数据”；名称为label2，显示结果），一个文本框（名称为text1，在此输入数据）。单击“计算”命令按钮，计算出该数据之内所有奇数的和（该数据为自然数）。（2）单击“退出”命令按钮关闭表单。注意：完成表但设计后输入1000运行表单的所有功能1. text1 文本框默认数据类型是文本，需要首先设置其value 值为0，这样该文本框的值类型默认就是数值型了，后面才可以输入一个表示成绩的数值. 其他控件设置属性参照前面的例子。2. Label2 控件的尺寸设置的稍微大一些，以便清楚的显示结果，或者把标签控件的autosize 属性设置为.T.。计算按钮的单击事件程序代码如下:s=0for i=1 to thisform.text1.values=s+ii=i+1endforthisform.label2.caption=str(s)第七题在指定文件夹下完成如下简单应用：1.打开表单myform001，把表单（名称为Form1）标题改为“欢迎您”，将文本“欢迎您访问系统”（名称为label1 的标签）改为25 号，字体的颜色设置为RGB（100，50，200）。最后,在表单上添加“关闭”（名称为Command1）命令按钮，单击此按钮关闭表单。保存并运行表单。2.设计一个表单myform002,上有三个命令按钮“查找”、 “替换”和“退出”（名称分别为Command1、 Command2 和Command3（建立新表单，保存为myform002；添加三个命令按钮，依次设置其caption 为“查找”、 “替换”和“退出”，注意对应关系，否则影响得分），一个编辑框（名称为edit1，内容为“ This is an example”）(添加edit 控件，设置其value值为This is an example）。单击“查找”命令按钮，选择Edit1 中的单词example(设置Edit1 按钮的HideSelection属性值为F，以便显示被选中的文本)；单击“替换”，用单词exercise 置换已选择的单词。单击“退出”命令按钮关闭表单。注意：完成表单设计后要运行表单的所有功能。查找按钮的单击事件代码为:thisform.edit1.selstart=at(example,thisform.edit1.text)-1thisform.edit1.sellength=7替换按钮的单击事件代码为:x=at(example,thisform.edit1.text)thisform.edit1.value=STUFF(thisform.edit1.value, x , 7 , exercise)thisform.edit1.selstart=at(exercise,thisform.edit1.text)-1thisform.edit1.sellength=8退出按钮的单击事件代码为:thisform.release第八题在指定文件夹下完成如下简单应用：1.打开表单myform001，把表单（名称为Form1）标题改为“欢迎学习”，将文本“VFP 数据库程序设计”（名称为label1 的标签）改为20 号黑体。最后在表单上添加“关闭”（名称为Command1）命令按钮，单击此按钮关闭表单。保存并运行表单。2.设计一个表单myform002（新建表单并保存为myform002）,表单上有两个命令按钮“求余数”和“退出”（名称分别为Command1 和Command2），有二个标签（名称分别为label1 和label2，内容为 “被除数”和“除数”，有三个文本框（名称为text1、text2 和text2，在text1 和text2 中输入被除数和除数，text3 中输出余数）。(text的value值改为0)单击“求余数”命令按钮，则显示出余数，被除数、除数均为整数。设置“求余数”按钮Command1 的单击事件代码为：if thisform.text2.value!=0 thenthisform.text3.value=mod(thisform.text1.value,thisform.text2.value)endif单击“退出”命令按钮关闭表单。注意：完成表单设计后要运行表单的所有功能。第九题在指定文件夹下完成如下简单应用：1.打开表单myform001，把表单（名称为Form1）标题改为“欢迎学习”，将文本“VFP 数据库系统”（名称为label1 的标签）改为25 号，字体颜色为RGB（100,60,80）。最后在表单上添加“关闭”（名称为Command1）命令按钮，单击此按钮关闭表单。保存并运行表单。2.设计一个表单myform002,表单上有两个命令按钮“计算”和“退出”（名称分别为Command1和Command2），二个标签（名称为label1，内容为“输入整数数据”，label2，输出结果），一个文本框（名称为text1，在此输入数据）（设计状态设置text1 按钮的value 值为0）。单击“计算”命令按钮，计算出从100 到输入数据内的所有“水仙花数”的个数，水仙花数是指一个三位数，其各位数字的立方和等于该数本身。计算按钮Command1 的单击事件代码为：thisform.label2.caption=str(0)x=thisform.text1.valueif x999 thenretuendin=0for i=101 to xs=str(i,3)a=val(substr(s,1,1)b=val(substr(s,2,1)c=val(substr(s,3,1)if i=a*3+b*3+c*3 thenn=n+1endifendforthisform.label2.caption=str(n)单击“退出”命令按钮关闭表单。注意：完成表单设计后要运行表单的所有功能。第十题在指定文件夹下完成如下简单应用：1.打开表单myform001，把表单（名称为Form1）标题改为“祝同学们”，将文本“身体健康，学习进步！”（名称为label1 的标签）改为25 号，字体颜色为RGB（255，0，0）。最后在表单上添加“关闭”（名称为Command1）命令按钮，单击此按钮关闭表单。保存并运行表单。2.设计一个表单myform002,表单上有两个命令按钮“计算阶乘”和“退出”（名称分别为Command1 和Command2），二个标签（名称为label1，内容为“输入一个整数”；label2，内容为“阶乘为”），二个文本框（名称为text1，在此输入数据；text2，显示阶乘）。单击“计算阶乘”命令按钮，则计算出输入数据的阶乘。单击“退出”命令按钮关闭表单。注意：完成表单设计后要运行表单的所有功能。注意设计状态设置text 控件按钮的value 值为0，运行程序时注意输入一个大于1 的正整数；Command1 控件按钮的单击事件代码为：X=thisform.text1.valueS=1For i=1to xS=s*iEndforThisform.text2.value=s第十一题根据以下要求，完成简单应用操作，所有文件保存在指定文件夹下：1.打开表单myform001，把表单（名称为Form1）标题改为“欢迎您”（caption），将文本“欢迎您访问系统”（名称为label1 的标签）改为25 号（设置label1 的fontsize）黑体(标签的fontname 属性设置为黑体)。最后在表单上添加“关闭”（名称为Command1）命令按钮，单击此按钮关闭表单(thisform.release)。保存并运行表单。2.设计一个表单myform002,上有两个命令按钮“查询”和“退出”（名称分别为Command1和Command2）。（1）单击“查询”命令按钮，查询BOOKAUTH 数据库中(authors 数据表中取作者信息， books 表中统计图书数量信息)出版过3 本以上（含3 本）图书的作者信息，包括作者姓名和所在城市；查询结果按作者姓名升序保存在表NEW_TABLE 中。右击表单设计器，打开数据环境，添加表books和authors。“查询”命令按钮Command1 的单击事件代码为：Select 作者姓名,所在城市 from authors,books where authors.作者编号=books.作者编号 group by books.作者编号 having(count(*)2) order by 作者姓名 into table new_table（2）单击“退出”命令按钮关闭表单。（退出的单击事件命令程序为thisform.release）注意：完成表单设计后要运行表单的所有功能。第十二题根据以下要求，完成简单应用操作，所有文件保存在指定文件夹下：1.建立查询文件MYQUERY，在SCORE_MANAGEB 数据库中（从student.dbf 表中）查询学生的姓名和年龄（计算年龄的公式是：今年年份-Year（出生日期），年龄作为字段名），结果保存在一个新表NEW_TABLE1 中。方法1 打开数据库设计器，从主菜单选择建立查询，添加表student,在查询设计器中的字段标签界面中添加姓名字段，在函数和表达式框中输入：year(date()-year(出生日期)as 年龄，然后点击添加按钮，则选定字段框中出现了需要的2 个字段。然后保存查询文件为myquery，并运行看一下结果。若结果正确则再在查询设计器中右单击选择“输出设置”，点击“表（T）”，输入表名new_table1,再次运行查询）方法2：先执行命令生成结果表：select 姓名,year(date()-year(出生日期) as 年龄from student into table new_table1再执行命令：modi comm myquery.qpr在打开的程序编辑窗口中输入命令 select 姓名,year(date()-year(出生日期) as 年龄from student into table new_table1，然后保存即可。2.建立菜单QUERY_MENU。该菜单中只有“查询”和“退出”两个菜单项（条形菜单）(即普通的横向菜单，左侧第一项为查询，第二项为退出)，其中单击“查询”菜单项时，运行查询文件MYQUERY.QPR(菜单项结果栏选择命令，命令框中输入 do myquery.qpr)；单击“退出”菜单项时，返回到Visual FoxPro 系统菜单（菜单项结果栏选择命令，退出命令框填： set sysmenu to defa）。（相应命令写在命令框中，不要写在过程中）。（完成菜单设计后，接着生成菜单，保存菜单为QUERY_MENU,然后在VFP 命令窗口中运行 do query_menu.mpr，运行各个菜单项）第十三题根据以下要求，完成简单应用操作，所有文件保存在指定文件夹下：1在SCORE_MANAGER 数据库中建立一个名为NEW_VIEW 的视图，该视图含有选修了课程但没有参加考试(成绩字段值为NULL)的学生信息(包括“学号”、“姓名”和“系部”3 个字段)。菜单方式建立视图:在数据库设计器中选择新建本地视图，根据要求设计并保存视图，注意视图设计器中student 表到score1 表的学号联接接改为左联接。命令方式建立视图：Open data score_managerCreate view new_view as select student.学号,姓名,系部 from student studentleft outer join score1 on student.学号 = score1.学号 where score1.成绩 is not null2建立表单MYFORM1，在表单上添加一个表格控件(名称为grdCourse)，并通过该控件显示表COURSE 的内容(要求RecordSourceType 属性必须为0)。新建表单，把表单拖动的大一些，在表单上添加表格控件，默认名称为Grid1，更改其name 属性为grdCourse。在表单空白处右单击，选择数据环境，添加表course。选定grdCourse控件，在属性框的数据标签中设置其RecordSourceType 属性值为0-表，设置其RecordSource属性值为course。保存表单为MYFORM1，运行表单。第十四题根据以下要求，完成简单应用操作，所有文件保存在指定文件夹下：1建立查询文件PJGZ_CX：根据学院表和教师表计算信息管理系教师的平均工资，结果存放到表tem 中。方法1 打开数据库设计器，从主菜单选择建立查询，添加表学院表及教师表，在两表的联接线上双击，设置其联接性质为左联接；在查询设计器中的字段标签界面中添加系名字段，在函数和表达式框中输入：avg(工资) as 平均工资，然后点击添加按钮，则选定字段框中出现了需要的2 个字段。然后保存查询文件为PJGZ_CX，并运行看一下结果。若结果正确则再在查询设计器中右单击选择“输出设置”，点击“表（T）”，输入表名tem,再次运行查询）方法2：先执行命令生成结果表：select 系名,avg(教师表.工资) as 平均工资 from 学院表 left outer join 教师表 on 学院表.系号 = 教师表.系号 group by 学院表.系名 into table tem.dbf再执行命令：modi comm PJGZ_CX.qpr在打开的程序编辑窗口中输入命令select 系名,avg(教师表.工资) as 平均工资 from 学院表 left outer join 教师表 on 学院表.系号 = 教师表.系号 group by 学院表.系名 into table tem.dbf ，然后保存即可。2在College 数据库中使用视图设计器建立一个名为course_v 的视图，该视图根据课程表、学院表和教师表建立，视图中的字段包括姓名、课程名、学时和系名4 项，视图中只包括学时大于等于60 的记录，视图中的记录先按系名升序排列，若系名相同再按姓名降序排列，最后查询该视图中的全部信息，并将结果存放到表sef 中。在数据库设计器中，首先建立教师表的系号和课程号普通索引，建立学院表的系号主索引，课程表的课程号主索引；并建立学院表到教师表的一对多联接，课程表到教师表的一对多联接。然后建立视图。1 菜单方式： 在视图设计其中按要求进行设计。建立视图后，执行查询命令：select * from course_v into table sef。2 命令方式：create view course_v as select 姓名,课程名,学时,系名 from 课程表 inner join教师表 inner join 学院表 on 学院表.系号=教师表.系号 on 课程表.课程号=教师表.课程号 where 学时=60 order by 系名,姓名 desc建立视图后，执行查询命令：select * from course_v into table sef。第十五题根据以下要求，完成简单应用操作，所有文件保存在指定文件夹下：1.使用查询设计器设计一个名为ONE 的查询文件，查询房价价格大于等于280 元的每盒(应该为”间”)客房的客户号(应该为客房号)、类型号（取自客房表）、类型名和价格。查询结果按类型号升序排列，并将结果输出到TABA 中，设计完成后运行该查询。注意在查询设计器中，先后添加客房表和房价表，设置客房表到房价表的联接方式为右联接，否则可能无法得到正确结果。2.使用SQL 的SELECT 语句查询“客户”表中性别为男的客户号、身份证、姓名和工作单位字段及相应的记录值，并将结果存储到名为TABB 的表（注意该表不需要排序）。请将该语句存储到名为TWO.PRG 的文件中。命令：select 客户号,身份证,姓名,工作单位 from 客户 where 性别=男 into table tabb建立一个名为two.prg 的文本文件（建议使用modi comm two.prg），内容为：select 客户号,身份证,姓名,工作单位 from 客户 where 性别=男 into table tabb。第十六题根据以下要求，完成简单应用操作，所有文件保存在指定文件夹下：1建立一个名为score_query 的查询。查询评委为歌手编号是01002的歌手所打的分数，然后将结果存入自由表result 中，该自由表的字段有评委姓名和分数，各记录按分数升序排列。最后运行该查询。步骤1：单击工具栏中的新建按钮，新建一个查询，将评分表和评委表添加到查询设计器中。步骤2：在字段选项卡中，按要求添加字段评委姓名和分数到选定字段中。步骤3：在筛选选项卡中的字段列中选择歌手编号，条件列中选择=，实例列中输入01002。步骤4：在排序依据选项卡中选择分数字段，升序排列。步骤5：单击查询菜单下的查询去向命令，设置查询去向为表result。步骤6：保存查询名为score_query，并运行查询。2根据上一步操作得到的自由表result 建立一个名为score_result 的报表。要求： 1)使用报表向导建立报表，报表中包括评委姓名和分数两个字段，按分数字段降序排列，报表标题为空。2)打开报表score_result，利用报表标签控件，将王岩盐得分情况作为报表的标题添加到报表中。步骤1：单击工具栏中的新建按钮，在新建对话框中选择报表，单击向导按钮，在弹出的向导选取中选择报表向导后单击确定按钮。步骤2：在步骤1-字段选取中，选择表RESULT，然后添加全部字段到可用字段中，连续单击下一步按钮，直到步骤5-排序记录，选择按分数字段降序排列。步骤3：在步骤6-完成中，报表标题设置为空，报表名为score_result。步骤4：打开报表score_result，选择主菜单报表下的标题/总结(T)命令，弹出标题/总结对话框，在报表标题中选中标题带区复选框，单击确定按钮，这样就在报表中加入了一个标题带区，打开报表控件工具栏，在打开的报表控件中选择标签控件，在标题带区单击鼠标，输入王岩盐得分情况。步骤5：保存并预览报表，查看报表的设计结果。第十七题根据以下要求，完成简单应用操作，所有文件保存在指定文件夹下：1.外汇管理数据库中，通过视图设计器建立满足如下要求的视图：1)视图依次包含列Currency_sl.姓名、Rate_exchange.外币名称、Currency_sl.持有数量和表达式Rate_exchange. 基准价*Currency_sl. 持有数量； ( 在“ 函数和表达式” 框中输入Rate_exchange.基准价*Currency_sl.持有数量 ，然后点击添加按钮即可。)2)按Rate_exchange.基准价*Currency_sl.持有数量降序排列；3)将视图保存为view_rate。利用视图设计器完成即可。2.使用SQL SELECT语句完成汇总查询，结果存储于表results中，该表含有姓名和人民币价值两个字段(其中 人民币价值为每人持有外币的Rate_exchange.基准价*Currency_sl.持有数量的合计)，最后将查询结果按人民币价值降序排列。命令中的SQL语句存储到three.prg中。执行命令：select Currency_sl.姓名,sum(Rate_exchange.基准价*Currency_sl.持有数量) as 人民币价值 from Currency_sl,Rate_exchange where Currency_sl.外币代码=Rate_exchange.外币代码 group by currency_sl.姓名 order by 人民币价值 desc into table results建立程序文件three.prg（建议使用 modi comm three.prg），把以上命令作为内容存储。第十八题根据以下要求，完成简单应用操作:1利用查询设计器创建查询，从指定文件夹下的xuesheng 表和chengji 表中查询数学、英语和信息技术三门课中至少有一门课在90 分以上（含）的学生记录。查询结果包含学号、姓名、数学、英语和信息技术5 个字段；各记录按学号降序排序；查询去向为表table1。最后将查询保存在query1.qpr 文件中，并运行该查询。1 查询设计器中，加入xuesheng 表和chengji 表，两表间为学号的内连接模式，设置条件为3 门课大于90，3 个条件间的联接为OR 关系，设置排序方式为学号的降序，设置查询去向为表文件table1，保存为query1.qpr 并执行查询。2 命令方式： select chengji.学号,数学,英语,信息技术,xuesheng.姓名 from chengji inner join xuesheng on chengji.学号=xuesheng.学号 where chengji.学号 in (select 学号 from chengji where 数学=90 or 英语=90 or 信息技术=90) order by chengji.学号desc into table table1运行命令成功后，建立一个名为query1.qpr 的文件，建议使用modi comm query1.qpr，存储其内容为以上命令。2在指定文件夹下完成如下操作：在指定文件夹下创建一个下拉式菜单mymenu.mnx，并生成菜单程序mymenu.mpr。运行该菜单程序时会在当前Visual FoxPro 系统菜单的帮助菜单项之前插入一个考试菜单项，内有“统计”和“返回”两个子菜单，如下图所示。菜单命令返回的功能是返回标准的系统菜单。菜单程序生成后，运行菜单程序并执行返回菜单命令。在菜单设计器中，建立菜单项“考试”，结果类型选择为“子菜单”，然后点击“创建”，依次建立子菜单项“统计”、“返回”。然后点击VFP 主菜单中“显示”菜单下的“常规选项”，在弹出的对话框中选择“在之前”（帮助），确定后返回就菜单设计器，选择“菜单”下的“生成”，保存菜单名为mymenu.mnx。第十九题根据以下要求，完成简单应用操作，所需文件（或要保存文件）均在指定文件夹下：1利用查询设计器创建查询，从orders、employee 和customer 表中查询2001 年5月1 日以后（含）所签所有订单的信息。查询结果依次包含订单号、签订日期、金额、签订者和客户名五项内容，其中签订者为签订订单的职员姓名。各记录按签订日期降序排序，签订日期相同按金额降序排序；查询去向为表tableone。最后将查询保存在queryone.qpr 文件中，并运行该查询。1 菜单方式： 在设计器中，添加三个表，设定orders 表通过职员号联接到employee，通过客户号联接到customer。然后选定指定的字段，在“函数和表达式”框中输入Employee.姓名 AS 签订者，点击添加。指定各个排序字段和输出去向，保存并运行。2 命令方式：先执行命令 SELECT Orders.订单号, Orders.签订日期, Orders.金额, Customer.客户名, Employee.姓名 AS 签订者 FROM customer INNER JOIN orders INNER JOIN employee ON Orders.职员号 = Employee.职员号 ON Customer.客户号 = Orders.客户号 WHERE Orders.签订日期 = 2001-5-1 ORDER BY Orders.签订日期 DESC, Orders.金额 DESC into table tableone然后建立文件queryone.qpr，建议使用modi comm queryone.qpr,保存其内容为以上命令。2建立文件名为Myform 的表单，表单中有两个命令按钮，按钮的名称分别为cmdin和cmdout，标题分别为进入和退出，将表orders、employee 和customer 添加到数据环境。并实现退出按钮的功能。第二十题根据以下要求，完成简单应用操作，所有文件保存在指定文件夹下：1使用查询设计器设计一个查询，查询每个班级的班级号、班级名、班长名和班主任名，查询结果按班级号升序排序，并输出到ONE 表中。运行该查询，并将设计的查询保存为ONE.QPR 文件。注意：1） 表之间的关联，一个是STUDENT 表的学号与CLASS 表的班长号，另一个是CLASS表的班主任号与TEACHER 表的教师号；2） 查询结果的各列的名称分别为班级号、班级名、班长名和班主任名。班长名列的数据来自于STUDENT 表的姓名，班主任名列的数据来自于TEACHER 表的教师名。在查询设计器中，班长名和班主任名为构造字段，构造方式分别是在“函数和表达式”框中输入STUDENT.姓名 as 班长名，点击“添加”；在“函数和表达式”框中输入teacher.姓名 as 班主任名，点击“添加”。其他设置根据题干要求操作。2建立一个菜单Mymenu，包括两个菜单项文件和帮助， 文件将激活子菜单，该子菜单包括打开、存为和 关闭三个菜单项；关闭子菜单项功能为返回到系统菜单(命令框中填：set sysmenu to defa)，其他菜单项的功能不做要求。(操作方式同前，注意设计完成后执行“生成”菜单功能)
展开阅读全文