高科VF104套机试答案.docx
《高科VF104套机试答案.docx》由会员分享，可在线阅读，更多相关《高科VF104套机试答案.docx（59页珍藏版）》请在冰点文库上搜索。
高科VF104套机试答案
【1套】
1.1modidataecommerce添加orderitem表
2.1modiqueryqq
2.2sele会员号,姓名,年龄fromcustomerwhere年龄<=30orderby年龄desctofilecut_ab
3
在文本框VALUE属性窗口输入:
=date（）
ab=thisform.text1.value
selecustomer.会员号,姓名,sum（article.单价*orderitem.数量）as总金额fromcustomer,orderitem,articlewherecustomer.会员号=orderitem.会员号andorderitem.商品号=article.商品号and日期>=abgroupby1orderby3intotabledbfa
【2套】
2.1双击customer表→【表】→追加记录→选择“customer1”表并确定
sele*fromcustomerwhere客户号in（sele客户号fromorder_list）orderby1intotableresults
3
（1）将order_list添加到报表数据环境中（右键→数据环境）
（2）右键→数据分组→选择“客户号”为分组表达式；将“客户号”字段拖到组标头带区；将“总金额”字段拖到组注脚带区,双击“总金额”→计算→选择“求和”并确定
（3）【报表】→标题/总结→选择“标题带区”及“总结带区”
（4）打开数据环境→双击表→输入setorderto客户号
【10套】
2.1seleorder_detail.*fromcustomer,order_list,order_detailwherecustomer.客户号=order_list.客户号andorder_list.订单号=order_detail.订单号and客户名="三益贸易公司"orderby1,4descintotableresults
2.2用modiformFORM1打开表单
双击“刷新标题”命令：
将thisform="简单应用"改为thisform.caption="简单应用"
双击“订单记录”命令：
将thisform.grid1="order_list.dbf"改为thisform.recordsource.grid1="order_list.dbf"
双击“关闭表单”命令：
将thisform.close改为thisform.release
3在“订货管理”数据中单击右键→修改为order_detail增加字段：
新单价类型:
浮动型/宽度:
10/小数位数:
2
modicommprog1
updateorder_detailset新单价=单价*0.9where订单号in（sele订单号fromorder_listwhereyear（订购日期）=2001）
updateorder_detailset新单价=单价*1.1where订单号in（sele订单号fromorder_listwhereyear（订购日期）=2002）
建立快速报表
closedataall
modireportreport1
【报表】→快速报表→选择“order_detail”选择指定字段→确定
【11套】
2.1sele*fromorder_listwhere总金额>（seleavg（总金额）fromorder_list）orderby1intotableresults
2.2closedataall
modireportreport1
【报表】→快速报表→选择“order_detail”→确定
【报表】→标题/总结→选择标题带区→利用标签控件输入文字“器件清单”
双击页注脚“date（）”将其改为“time（）”
3modicommprog1
sele*fromorder_detailintotableod_bak
seleright（订单号,1）as订单号,器件号,器件名,min（单价）as单价,sum（数量）as数量fromod_bakgroupby1,2orderby1,2intotableod_new
【16套】
1.1to改为into其他不变
1.2将delete销售表改为deletefrom销售表其他不变
1.3在“商品销售”数据库中双击“商品表”→【文件】→另存为html→确定
2.1SELECT商品表.商品号,商品名,销售表.单价,销售数量,销售表.单价*销售数量AS销售金额FROM商品表,销售表WHERE商品表.商品号=销售表.商品号ORDERBY销售金额DESCINTOTABLEsee_a
2.2ThisForm.标题="商品销售数据输入"改为ThisForm.caption="商品销售数据输入"
DOsellcomm改为DOformsellcomm
DOprint1TOPREVIEW改为reportformprint1PREVIEW
3在命令窗口中输入modicommchange_c
sele*from商品表intotable商品表备份
update商品表set单价=出厂单价*0.1whereleft（商品号,2）="10"
在命令窗口中输入modiformform2
调整代码：
dochange_c
退出代码：
thisform.release
【17套】
2.1【文件】→新建→报表→向导→报表向导
2.2SELECTFORMDEPT改为SELECT*FROMSALARYS
DELETETHISFORM改为THISFORM.release
3modicommchange_c
sele*fromsalarysintotablebak_salarys
closedataall
usec_salary1
setorderto雇员号
sele0
usesalarys
setrelato雇员号intoc_salary1
replace工资withc_salary1.工资for雇员号=c_salary1.雇员号
在命令窗口中输入modiformform2
调整代码：
dochange_c
退出代码：
thisform.release
【18套】
2.1在“订货管理”数据库双击打开“order_list表”→【表】→追加记录→从来源于选择“order_list1.DBF”→确定
在命令窗口中输入
selecustomer.客户号,客户名,订单号,总金额fromcustomer,order_listwherecustomer.客户号=order_list.客户号orderby4descintotableresults
2.2在命令窗口中输入modiformform1
选择5个控件→【格式】→对齐→左边对齐
添加表格控件/RecordSourceType:
0-表/RecordSource:
customer
3modicommprog1
closedataall
sele订单号,sum（单价*数量）as总金额fromorder_detailgroupby1intotablenew
indexon订单号tag订单号
sele0
useorder_list
setrelationto订单号intonew
repl总金额withnew.总金额for订单号=new.订单号
sele*fromorder_listorderby总金额descintotableod_new
【19套】
2.1
（1）在“订货管理”数据库双击打开“order_detail表”→【表】→追加记录→从来源于选择“order_detail1.DBF”→确定
（2）在命令窗口中输入
seleorder_list.订单号,订购日期,器件号,器件名,总金额fromorder_list,order_detailwhereorder_list.订单号=order_detail.订单号orderby1,5descintotableresults
2.2在命令窗口中输入modicommmodi1
（1）将WITH改为=其他不变
（2）将ORDER改为GROUP其他不变
（3）将FOR改为WHERE
3modicommprog1
sele订单号,sum（单价*数量）as总金额fromorder_detailgroupby1intotablenew
sele客户号,order_list.订单号,订购日期,new.总金额fromorder_list,newwhereorder_list.订单号=new.订单号andorder_list.总金额#new.总金额orderby4intotableod_mod
altertableod_modalter总金额f（15,2）
【22套】
1.1sele*fromstock_slintotablestock_bk1.2insertintostock_bkvalue（"600028",4.36,4.60,5500）
1.3updatestock_bkset现价=8.88where股票代码="600007"1.4deletefromstock_bkwhere股票代码="600000"
2.1modiqueryquery_stock
2.2将count改为sum其他不变/=改为in/将like改为$其他不变
3modiformstock_form
右键→数据环境→添加两表并拉线建立联系/拖拽到表单中
【23套】
1.4update学生set出生日期={^1983-05-01}where姓名="王三风"
2.1sele姓名from学生,选课where学生.学号=选课.学号and成绩>=70groupby姓名havingcount（*）>=3orderby姓名intotableresults
2.2alterTABLE学生ADD平均成绩N（6,2）/DOWHILEnotEOF（）/REPLACE平均成绩withcj[1]
3右键→新建本地视图/拖拽视图到表单中
【24套】
1.1modidatabookauth添加2个表
2.1表单的Caption改为欢迎您/标签属性FontSize和FontName
2.2sele作者姓名,所在城市fromauthors,bookswhereauthors.作者编号=books.作者编号groupby作者姓名havingcount（*）>=3orderby1intotablenew_view4
3sele*frombookswhere"计算机"$书名intotablebooks_bak
updatebooks_bakset价格=价格*0.95
sele出版单位,avg（价格）as均价frombooks_bakgroupby出版单位intotablenew
seletop1*fromnewwhere均价>=25orderby均价intotablenew_table4
【25套】
1.1[文件]→新建→查询→向导→查询向导
1.2选择视图→右键→删除→移去
1.3insertintoscore1value（"993503433","0001",99）
2.1右键→新建本地视图注:
筛选条件为isnull
2.2modiformmyform3
设置表格属性:
Name:
Grdcourse/RecordSourceType:
0/RecordSource:
course
3modimenutj_menu3
平均代码
sele课程名,avg（成绩）as平均成绩fromcourse,score1wherecourse.课程号=score1.课程号groupby1intotablenew_table32
退出代码
setsysmenutodefault
【26套】
1.1modimenuquery_menu
退出:
setsysmenutodefault***【菜单】→生成
1.2altertablecourserename开课系部to开课单位
1.4sele*fromscore1orderby学号,成绩descintotablenew_order
2.1selecount（distinct学号）as学生人数fromscore1intotablenew_table
2.2[文件]→新建→报表→向导
3.sele课程名,max（成绩）as最高分fromcourse,score1wherescore1.课程号=course.课程号groupby1intotablenew_table3
【27套】
1.1modidatasdb右键?
修改
1.4[文件]→新建→报表→向导
2.1modiquerytwo
2.2将学号改为student.学号其他不变/将of改为on其他不变/本行改为WHERE性别="女"
本行改为GROUPBYstudent.学号havingAVG（成绩）>=75
3selestudent.学号,姓名,avg（成绩）as平均成绩,min（成绩）as最低分fromstudent,scwherestudent.学号=sc.学号groupby1havingmin（成绩）>=60intotablefour
【28套】
1.1modiproject供应
2.1sele供应商号,工程号,数量from供应where零件号in（sele零件号from零件where颜色="红"）orderby3descintotablesupply_temp
3modiformmysupply
将表格的RecordSourceType改为4
ab=thisform.text1.value
thisform.grid1.recordsource="sele零件名,颜色,重量from零件,供应where零件.零件号=供应.零件号and工程号=aborderby1intotablepp"
【29套】
1.1modidata?
2.1sele姓名,2003-year（出生日期）as年龄fromstudentintotablenew_table1
[文件]→新建→报表→向导
2.2modimenuquery_menu
3.ab=thisform.text1.value
closedataall
usescore1
locatefor学号=alltrim（ab）
iffound（）=.t.
thisform.grid1.recordsource="sele课程名,成绩fromcourse,score1wherecourse.课程号=score1.课程号and学号=abintocursorgrid1"
else
wait"学号不存在,请重新输入学号"windowtimeout3
endif
【30套】
2.1sele书名,作者,价格fromborrows,loans,bookwhereborrows.借书证号=loans.借书证号andloans.图书登记号=book.图书登记号and姓名="田亮"orderby3descintodbfbook_temp
2.2modiformform_menu
表单:
ShowWindow属性改为2双击表单:
domenu_lin.mprwiththis,.t.
3modiformform_book
组合框设置:
RowSourceType改为5/RowSource改为2/Style改为2
双击表单输入代码
publicdimea（3）
a
（1）="清华"
a
（2）="北航"
a（3）="科学"
统计代码:
ab=bo1.value
selecount（*）frombookwhere出版社=abintoarraytmp
thisform.text1.value=tmp
【31套】
1.1modidata学生
2.1sele学生.学号,姓名,avg（成绩）as平均分,count（*）as选课门数from学生,选课where学生.学号=选课.学号groupby1havingcount（*）>=5orderby3descintotablestu_temp
*通过右键将stu_temp表添加到当前数据库
2.2modimenumenu_lin
退出:
在过程中输入setsysmenutodefault
***【菜单】→生成
3modiformmystu
选项按钮设置:
（1）右键→生成器/
（2）将选项按钮的Name改为myoption
计算代码如下:
ab=thisform.myoption.value
ifab=1
sele学号,成绩from选课where课程号in（sele课程号from课程where课程名称="C语言"）orderby成绩intotablestu_sort1
else
sele学号,成绩from选课where课程号in（sele课程号from课程where课程名称="C语言"）orderby成绩descintotablestu_sort2
endif
【32套】
1.1modidatarate添加2个表
1.4将Enabled改为.T.
2.1sele外币名称,持有数量fromrate_exchange,currency_slwhererate_exchange.外币代码=currency_sl.外币代码and姓名="林诗因"orderby持有数量intotablerate_temp
2.2【文件】→新建→报表→向导→报表向导
3modiformcurrency_form
将表格的RecordSourceType改为4
查询代码如下:
ab=thisform.text1.value
thisform.grid1.recordsource="sele外币名称,现钞买入价*持有数量as人民币数量fromrate_exchange,currency_slwhererate_exchange.外币代码=currency_sl.外币代码and姓名=aborderby2descintotabledbfa"
【33套】
1.1modidata外汇数据
1.4FontName属性
2.1locatefor姓名="林诗因"/dowhilenoteof（）/summ=summ+a[1]*持有数量
2.2modimenumenu_ratesetsysmenutodefault***【菜单】→生成
3modiformmyrate
选项按钮:
Name改为myoption按钮个数:
右键→生成器
统计代码:
ab=thisform.myoption.value
docase
caseab=1
sele姓名,持有数量fromcurrency_slwhere外币代码in（sele外币代码fromrate_exchangewhere外币名称="日元"）intotablerate_ry
caseab=2
sele姓名,持有数量fromcurrency_slwhere外币代码in（sele外币代码fromrate_exchangewhere外币名称="美元"）intotablerate_my
caseab=3
sele姓名,持有数量fromcurrency_slwhere外币代码in（sele外币代码fromrate_exchangewhere外币名称="欧元"）intotablerate_oy
endcase
【34套】
1.1modiproject学生管理
2.1update教师set新工资=原工资*1.2where职称="教授"
update教师set新工资=原工资where职称<>"教授"
insertinto教师values（"林红","讲师",10000,10200）
2.2modiquerystud注：
选择学生、选课、课程3个表筛选：
2个条件
3modiformmystu
查询代码：
thisform.grid1.recordsource="sele姓名,课程名称,成绩from学生,选课,课程where学生.学号=选课.学号and选课.课程号=课程.课程号and系=[6]intocursorgrid1"
【35套】
1.1modiproject库存管理
1.4modimenumymenu
2.1sele项目信息.项目号,项目名,零件信息.零件号,零件名称from零件信息,使用零件,项目信息where零件信息.零件号=使用零件.零件号and使用零件.项目号=项目信息.项目号orderby项目信息.项目号desc,零件信息.零件号intotableitem_temp
2.2右键→新建本地视图
3.表单:
Load
publicdimesz（3）
sz
（1）="s1"
sz
（2）="s2"
sz（3）="s3"
设置组合框:
列表项:
数组中的值,并输入
升级会员 