vf题库对应答案.docx
《vf题库对应答案.docx》由会员分享，可在线阅读，更多相关《vf题库对应答案.docx（41页珍藏版）》请在冰豆网上搜索。
vf题库对应答案
第90套
一、基本操作
1．规则写：
性别=”男”OR性别=”女”默认值写：
“男”
2．选择菜单新建→菜单→快捷菜单
在菜单名称栏依次输入打开、关闭、退出
单击保存，输入菜单名称cd.mnx单击菜单菜单→生成→输入cd.mpr
3．打开数据库“人事管理”右击职工表，选择修改
选中部门编号后对应的升序索引
4．从部门表的部门编号索引拖动至职工表的部门编号索引
从数据工作期关闭数据库中的所有表
选择菜单数据库→清理数据库选择菜单数据库→编辑参照完整性
在参照完整性生成器中，分别设置三个规则为级联、限制、限制
二、简单应用
1．新建程序文件，保存为prgone．Prg内容为：
SELECT编号,姓名,出生日期,名称AS部门名称;
FROM部门JOIN职工;
ON部门.部门编号=职工.部门编号;
WHERE名称="销售部";
ANDyear（出生日期）BETWEEN1985AND1989;
ORDERBY出生日期,编号;
INTOTABLEcyqk
2．输入命令
createclassmylistboxofmyclasslibaslistbox
在属性窗口中设置height为120Width为80保存退出
三、综合应用
新建一个表单，保存为pform．Scx设置表单属性name值为formoneCaption值为人员查询
界面元素分别按要求设置其caption和name值设置gridone的recordsourcetype属性为4-sql说明
查询按钮的click代码为
bm=alltrim（thisform.textone.value）
thisform.gridone.recordsource=";
SELECT姓名,性别,出生日期,编号;
FROM部门JOIN职工;
ON部门.部门编号=职工.部门编号;
where名称=bm;
ORDERBY职工.编号;
INTOTABLEtableone"
退出按钮的click代码为:
Thisform.release
第89套
一、基本操作
1．选择菜单新建→数据库→新建文件
输入数据库文件名学校在数据库设计器中右击,选择添加表依次将三个表加入
2．在数据库设计器中对着职称表右击选择修改进入表设计器，单击索引标签，索引名称输入
Indexone，索引类型选择主索引，索引表达式输入职称级别
3．选择菜单新建→报表→向导（按向导指引一步步选择）
4．打开程序文件test．Prg，修改为：
select职称级别,基本工资from职称表where职称名="教授"intodbfprof.dbforderby基本工资
二、简单应用
1．打开temp．prg修改后为：
createtable职称系数表（职称名c（6）,职称系数f（10,2））&&有错误
insertinto职称系数表value（"教授",1.4）
insertinto职称系数表value（"副教授",1.3）&&有错误
insertinto职称系数表value（"讲师",1.2）
insertinto职称系数表value（"助教",1.0）
SELECT姓名,系号,课时*80*职称系数+基本工资as应发工资;
FROM职称系数表,教师表,职称表;&&有错误
WHERE职称表.职称级别=教师表.职称级别;
and职称表.职称名=职称系数表.职称名;&&有错误
intodbfsalary.dbf;
orderby系号desc,应发工资
2．输入命令
createclassmycheckboxofmyclasslibascheckbox
右击进入属性窗口，设置value为1，保存退出
新建一个表单，保存为myform
选择菜单显示→菜单控件工具栏，单击第二列第一个按钮（查看类）选择添加，选择myclasslib.VCX并打开，选择复选框工具，并拖出一个对象，最后保存。
三、综合应用
1．新建表单，文件名为formtest设置表单name值也为formtest；画出表单中各元素
2．右击选择数据环境，依次添加学院表和教师表
3．设置label1的caption属性为系名
4．设置list1的rowsource和rowsourcetype分别为学院表．系名和6
5.Grid1的RecordSource和RecordSourceType属性指定为"select职工号,姓名,课时from教师表intocursortmp"和4。
6．List1的dblclick代码为：
xm=alltrim（thisform.list1.value）
thisform.grid1.recordsource=;
"SELECT教师表.职工号,教师表.姓名,教师表.课时;
FROM学校!
教师表INNERJOIN学校!
学院表;
ON教师表.系号=学院表.系号where系名=xm;
ORDERBY教师表.职工号DESCINTOTABLEtwo"
第88套
一、基本操作
1．新建表单，保存为myform．Scx设置表单name属性的值为myform
2．打开表单formtwo．Scx设置表单的caption属性值为“计算机等级考试”
3．打开表单formthree．Scx选择菜单显示→布局工具栏，同时框选表单上的4个命令按钮，再选择布局工具栏中的顶边对齐。
4．打开表单formfour．Scx设置表单autocenter属性为．T．
二、简单应用
1．新建查询，向查询设计器中依次添加goods,orderitem,order三张表
在字段标签中选择客户名、订单号、图书名、单价、数量、签订日期
在筛选标签中设置客户名like“吴%”
在排序依据标签中选择客户名，设为升序
选择菜单查询→查询去向→表，输入表名为appone
保存查询文件为appone，并运行.
2．新建程序文件apptwo.prg向其中输入以下代码：
SELECT客户名,sum（数量）as订购总册数,sum（Orderitem.数量*Goods.单价）as金额;
FROMgoodsJOINorderitemJOINorder;
ONOrderitem.订单号=Order.订单号ONGoods.图书号=Orderitem.图书号;
GROUPBY客户名ORDERBY3DESCINTOTABLEapptwo.dbf
保存并执行。
三、综合应用
1、新建数据库“订单管理”。
2、在数据库设计器中右击，依次添加goods,orderitem,order表
3、新建本地视图,在设计器中依次添加goods,orderitem,order三张表,在字段标签中选择：
客户名、订单号、图书名、数量、单价，在函数和表达式里输入单价*数量as金额并添加过去,保存视图为orderview并查看结果
4．新建表单，保存为orderform设置name属性为orderform,在表单中添加表格grid1,设置recordsourcetype属性为”表”,添加命令按钮command1设置其caption为退出
5．双击表单进入表单的load事件代码，并输入
Select客户名，图书名，金额fromorderviewwhere数量=1；
orderby客户名，金额descintotableresult
5．进入表单的init事件代码，并输入
Thisform．Grid1．recordsource=”result”
6．进入退出按钮的click事件代码，输入
Thisform．Release
7．运行表单
第87套
一、基本操作
打开表单文件formone
1．设置表单caption属性为“基本操作”设置maxbutton属性为.f.
2．表单中右击选择数据环境，添加customers
3．设置确认按钮的default属性为.t.
4．单击控件工具栏中的“查看类”按钮，选择“添加”，选中“myclasslib.VCX”，并打开，在表单中拖出一个mytextbox控件即可。
二、简单应用
1．新建一个程序文件pone.prg内容如下：
SELECTmonth（签订日期）as月份,count（*）as订单数;
FROMordersGROUPBY1ORDERBY1INTOTABLEtableone
最后执行该程序文件。
2．新建一个数据库goods_m，在数据库设计器中右击，添加一个表goods.
右击新建本地视图，添加goods表至视图设计器，
字段标签中依次选择商品号，商品名、单价、库存量
筛选标签中设置为
排序标签中选择商品号升序
保存视图为viewone
在命令窗口输入：
select*fromviewoneintotabletabletwo
三、综合应用
新建表单，保存为fromtwo向其中添加标签、文本框、命令按钮三个控件
1．设置label1的caption为日期,command1的caption为查询
2．设置文本框的value属性为=date（）
3．双击command1,进入其click事件代码,输入:
rq=thisform.text1.value
SELECT签订日期,Orders.订单号,姓名AS客户名,商品名,单价,数量;
FROMgoodsJOINorderitemsJOINordersJOINcustomers;
ONOrders.客户号=Customers.客户号ONOrderitems.订单号=Orders.订单号;
ONGoods.商品号=Orderitems.商品号;
where签订日期>=rqORDERBY签订日期,Orders.订单号,商品名;
INTOTABLEtablethree
第86套
一、基本操作
1．新建项目myproject
2．项目管理器中选择数据→数据库→新建，创建mybase数据库
3．在数据库设计器中，右击，添加三张自由表
4．关闭数据库设计器，在项目管理器中，选择文档→表单→新建
建立一个表单，保存为myform，最后关闭项目管理器
二、简单应用
1．打开mybase数据库，在数据库设计器中右键选择新建本地视图。
向视图设计器中依次添加goods,orderitem,order三张表。
在字段标签中依次选择客户名、订单号、图书名、单价、数量、签订日期
保存视图为myview
在命令窗口中输入以下命令：
select*frommyviewwhere客户名like"吴%";
orderby客户名,订单号,图书名intotablemytable
2．打开表单myform
1设置表单caption属性为“简单应用”
2设置表单autocenter属性为.t.
3添加一个命令按钮command1,在其click事件代码中输入thisform．Release
4右键选择“数据环境”，将myview添加进去
5从数据环境中直接拖动myview至表单中。
三、综合应用
1．打开项目myproject
2．在项目中新建程序，内容为：
SELECT客户名,图书名,数量,单价,单价*数量as金额;
FROMgoodsJOINorderitemJOINorder;
ONOrderitem.订单号=Order.订单号ONGoods.图书号=Orderitem.图书号;
WHEREmonth（签订日期）>=7;
ORDERBYOrder.客户名,Goods.图书名INTOTABLEmysqltable
保存程序文件为：
sql
3．在项目中新建菜单mymenu
运行表单的命令中输入：
doformmyform
执行程序的命令中输入：
dosql
退出的过程中输入：
Setsysmenunosave
Setsysmenutodefault
Clearevents
选择菜单→生成，以生成菜单程序文件mymenu.mpr
4．在项目中建立程序main内容为：
Domymenu.mpr
Readevents
保存关闭程序文件，在main上右键选择设为主文件
5．在项目管理器中选择连编→连编应用程序→myproject．App
执行连编后的文件:
domyproject.app以测试效果
第85套
一、基本操作
打开表单formone
1．选择菜单显示→布局工具栏，框选表单中的两个控件，在布局工具栏中选择顶边对齐
2．设置文本框value属性为0
3．设置表单caption属性为“基本操作”，命令按钮caption属性为“确定”
4．进入文本框的interactivechange事件代码，输入：
Ifthisform.text1.value<0
Tmand1.enabled=.f.
Endif
二、简单应用
1．在命令窗口输入命令：
Createclassmyformofmyclasslibasform
设置表单atutocenter属性为.t.,closable属性为.f.在表单中添加一个命令按钮，其caption属性为“关闭”,其click事件代码为thisform.release
2．新建查询，向查询设计器中依次添加orders,orderitems,goods三张表
在字段标签中依次选择订单号、客户号、签订日期，
函数和表达式中输入sum（单价*数量）as总金额并点添加
分组依据标签中选择订单号,
排序标签中选择总金额降序，订单号升序
查询→查询去向选择表tableone最后保存为queryone并运行.
三、综合应用
新建菜单保存为mymenu.mnx,界面如题设置
单击菜单显示→常规选项→追加
“统计”的过程代码为：
SELECT姓名AS客户名,count（*）as订单数FROMordersJOINcustomers;
ONOrders.客户号=Customers.客户号WHEREyear（签订日期）=2007;
GROUPBY姓名ORDERBY2DESC,姓名INTOTABLEtabletwo.dbf
“返回”的过程代码为：
Setsysmenunosave
Setsysmenutodefault
选择菜单→生成，生成mymenu.mpr文件
执行菜单domymenu.mpr
第84套
一基本操作
1．略2。
略
3．Deletefromstudentwhere学号=”s3”
4．略
二简单应用
1．略
2．第一处错误改为：
SELECT顾客号,sum（数量*单价）应付款
第二处错误改为：
DOWHILEnotEOF（）
第三处错误改为：
REPLACE应付款withmoney
三综合应用
新建一个表单，保存文件名文gk，设置表单cpation值为“顾客购买商品”，如题设计好界面。
Label1的caption属性为“顾客号”，label2的caption属性为“应付款”，
Grid1的recordsourcetype属性为“4-sql说明”，
Command1的caption属性为“查询”，command2的caption属性为“退出”
“查询”按钮的click事件代码为：
gkh=alltrim（thisform.text1.value）
thisform.grid1.recordsource=;
"SELECTCust.顾客号,Comm.商品号,商品名,单价,数量,单价*数量as金额;
FROMcustJOINorderJOINcomm;
ONComm.商品号=Order.商品号ONCust.顾客号=Order.顾客号;
whereCust.顾客号=gkhORDERBYComm.商品号INTOTABLEtjb"
SELECTsum（单价*数量）as应付款FROMcustJOINorderJOINcomm;
ONComm.商品号=Order.商品号ONCust.顾客号=Order.顾客号;
whereCust.顾客号=gkhintoarrayarr
thisform.text2.value=arr
（1）
“退出”按钮的click事件代码为：
Thisform.release
第83套
一基本操作
1.略
2.略
3.略
4.新建一个程序文件，保存为one.prg代码如下：
createtable销售明细表（;
顺序号c（6）primarykey,日期d,商品号c（6）,商品名c（10）,金额n（10,2））
二、简单应用
1.略
2.新建一个查询，依次添加三张表comm，order，cust
在再断标签中选择顾客号，顾客名，地址，
函数和表达式中输入sum（单价*数量）as付款金额再点添加
排序标签中选择顾客号升序
选择菜单查询→查询去向→表→taba
保存查询文件为view-c并运行。
三综合应用
新建表单，保存文件名为two，设置caption属性为“查询”
1在表单中右键选择数据环境，依次添加order，cust，comm表
2设置表单的autocenter属性为.t.
3根据试题设计表单界面
设置label1的caption属性为“输入顾客号”，command1的caption属性为“查询”，command2的caption属性为“退出”，grid1和grid2的recordsourcetype为“4-sql说明”
查询按钮的click事件代码为：
gkh=alltrim（thisform.text1.value）
thisform.grid1.recordsource=;
"SELECT顾客号,顾客名,地址FROMcustwhere顾客号=gkhintotabletabb"
thisform.grid2.recordsource=;
"SELECTComm.商品号,商品名,单价,数量,单价*数量as金额;
FROMcommJOINorderJOINcust;
ONOrder.顾客号=Cust.顾客号ONComm.商品号=Order.商品号;
whereCust.顾客号=gkhORDERBYComm.商品号INTOTABLEtabc"
退出按钮的click事件代码为：
Thisform.release
第82套
一基本操作
1略
2规则为left（职工号,4）=”1102”
3i=i+1改为i=i+2
4略
二简单应用
1修改后为：
SELECT系名,avg（工资）as平均工资,max（工资）as最高工资;
FROM教师表,学院表WHERE教师表.系号=学院表.系号;
groupBY学院表.系号;
orderBY3DESC,2DESC;
INTOtablethree
并执行改程序。
2略
三综合应用
1新建表单保存为oneform其name属性也为oneform
生成一个页框控件pageframe1其pageframe属性为默认值2，page1的caption属性为系名，page2的caption属性为计算方法
在属性中选择page1对象，在其内部生成组合框combo1，
在属性中选择page2对象，在其内部生成选项按钮组optiongroup1,设置option1的caption属性为平均工资，设置option2的caption属性为总工资。
在页框下面生成两个命令按钮command和command2，其caption分别为生成和退出。
2右键表单，选择数据环境，添加学院表，
从属性中选择combo1对象，设置其rowsourcetype属性值为6，rowsource属性值为“学院表.系名”
3“生成”按钮的click事件代码为：
xm=alltrim（bo1.value）
ifthisform.pageframe1.page2.optiongroup1.value=1
SELECT系名,学院表.系号,avg（工资）as平均工资;
FROM学院表JOIN教师表ON学院表.系号=教师表.系号;
where系名=xmINTOTABLEsalary
else
SELECT系名,学院表.系号,sum（工资）as总工资;
FROM学院表JOIN教师表ON学院表.系号=教师表.系号;
where系名=xmINTOTABLEsalary
endif
4“退出”按钮的click事件代码为：
thisform.release
5按题目要求运行。
第81套
一基本操作
1略
2略
3在命令窗口输入：
select*from教师表where工资>4500orderby职工号tofileone.txt
新建程序文件two.prg复制粘贴刚才的命令。
4略
二简单应用
1修改后的程序文件为：
&&下句只有一处有错误
SELECT系号FROM学院表where系名="信息管理"INTOARRAYa
&&下句只有一处有错误
use教师表
STORE0TOsum
STORE0TOnum
&&下句只有一处有错误
SCANfor系号=a
sum=sum+工资
&&下句缺少一句
num=num+1
ENDSCAN
?
sum/num
2打开数据库college,在数据库设计器中右键新建本地视图，
依次添加课程表，教师表，学院表
建立视图的其余步骤略。
最后在命令窗口输入：
select*fromcoursr_vintotablese
三综合应用
1新建表单，保存文件名为oneform，设置表单name值为oneform，自己创建界面
2在表单中右
升级会员 