vf机试 程序 部分 答案 大全文档Word文件下载.docx
《vf机试 程序 部分 答案 大全文档Word文件下载.docx》由会员分享，可在线阅读，更多相关《vf机试 程序 部分 答案 大全文档Word文件下载.docx（33页珍藏版）》请在冰豆网上搜索。
ThisForm.Text1.Value＝m2"
。
3.SELECTEmployee.组别,Employee.姓名AS负责人,sum（orders.金额）as合计;
FROM订单管理!
employeeINNERJOIN订单管理!
orders;
ONEmployee.职员号=Orders.职员号;
WHEREEmployee.职务="
组长"
;
GROUPBYEmployee.组别;
ORDERBY3DESC;
INTOTABLEtabletwo.dbf
五.2.双击表单空白处，分别输入表单Init和Destroy事件
DOmenu_lin.mprWithThis,"
abc"
ReleaseMenuabcExtended
3.SELECTCOUNT（*）FROMBOOK;
WHERE出版社=THISFORM.COMBO1.VALUE;
INTOARRAYTEMP
THISFORM.TEXT1.VALUE=TEMP
（1）
六1.INSEINTO零件信息VALUES（"
p7"
"
PN7"
1020）
DELEFROM零件信息WHERE单价<
600
UPDATE零件信息SET单价=1090WHERE零件号="
p4"
2.第1行中的"
="
改"
IN"
；
"
GROUPBY项目号"
GROUPBY零件号"
INTOFILE"
TOFILE"
七.2.FORi=1TOthisform.List1.ListCount，
s=thisform.List1.List（i）：
s=s+"
+thisform.List1.List（i）
3.Init"
事件代码DOmymenu.mprWITHTHIS,"
myform"
@SELECTCustomer.客户号,Customer.客户名,sum（orders.金额）as合计;
FROMcustomer,orders;
WHERECustomer.客户号=Orders.客户号;
GROUPBYCustomer.客户号;
ORDERBY3DESC;
INTOTABLEtabletwo.dbf
八1.ALTERTABLE课程表ADDUNIQUE课程号TAGtemp
（4）将第二行语句改为：
DOWHILEi>
=1
2.错误1：
将TO改为INTO。
错误2：
将OPEN改为USE。
错误3：
将SCANOF改为SCANFOR。
错误4：
将OR改为AND。
错误5：
将sum+1改为sum=sum+1。
3.表单的load事件
publica（3）
a
（1）="
3000"
a
（2）="
4000"
a（3）="
5000"
@x=val（bo1.value）
ifthisform.optiongroup1.value=1
sele*from教师表where工资>
=xorderby工资desc,姓名intotablesalary
else
sele*from教师表where工资<
xorderby工资desc,姓名intotablesalary
endif
九.1.ALTERTABLEstudentADDUNIQUE学号TAG学号
2.错误1：
改为STORE0TOx,s1,s2,s3。
改为x=val（thisform.text1.value）。
改为ifmod（x,3）=0。
步骤2"
退出"
按钮的Click事件代码为"
Thisform.Release"
3.SELECTStudent.姓名,Course.课程名称,Score.考试成绩;
FROMstudentINNERJOINscore;
INNERJOINcourse;
ONScore.课程编号=Course.课程编号;
ONStudent.学号=Score.学号;
where&
cn;
ORDERBYCourse.课程名称,Score.考试成绩DESC;
INTOTABLEzonghe.dbf
十2.SELECT姓名,2003-Year（出生日期）as年龄FROMstudentINTOTABLEnew_table1.dbf
3.SELECTcourse.课程名,score1.成绩;
FROMcourse,score1;
WHEREcourse.课程号=score1.课程号ANDscore1.学号=ThisForm.Text1.text;
INTOTABLEcoruse_cursor
IFRECC（）=0
MESSAGEBOX（"
学号不存在，请重新输入学号"
）
ELSE
ThisForm.Grid1.RecordSource="
coruse_cursor"
ThisForm.Grid1.refresh
ENDIF
十一.1.SELECT外币名称,现钞买入价,卖出价;
FROMrate_exchange;
INTOTABLErate_ex.dbf
@UpdateRate_exchangeset卖出价=829.01where外币名称='
美元'
2.标签的Alignment的值为：
2－中央
步骤3：
选中标签，然后执行"
格式"
→"
对齐"
菜单中的"
水平居中"
命令。
计时器的Interval值为500。
步骤4：
为各命令按钮编写Click事件的代码：
暂停"
ThisForm.Timer1.Interval=0
继续"
ThisForm.Timer1.Interval=500
退出ThisForm.Release
计时器"
的timer事ThisForm.Label1.Caption=time（）
十二.1.SELECT*;
FROMcollege!
教师表;
WHERE教师表.工资>
4500;
ORDERBY教师表.职工号;
TOFILEone.txt
2.第一处：
WHILE改为WHERE。
第二处OPEN改为USE。
第三处：
WHERE改为FOR。
第四处填入num=num＋1。
3.x=bo1.value
SELECT学院表.系名,学院表.系号,avg（教师表.工资）as平均工资;
FROMcollege!
学院表INNERJOINcollege!
教师表;
ON学院表.系号=教师表.系号;
WHERE学院表.系名=x;
GROUPBY学院表.系号;
INTOTABLEsalary.dbf
SELECT学院表.系名,学院表.系号,sum（教师表.工资）as总工资;
INTOTABLEsalary.dbfEndif
十三.2.SELECTRate_exchange.外币名称,Currency_sl.持有数量;
FROMcurrency_sl,rate_exchange;
WHERECurrency_sl.外币代码=Rate_exchange.外币代码;
ANDCurrency_sl.姓名="
林诗因"
ORDERBYCurrency_sl.持有数量;
INTOTABLErate_temp.dbf
3.fromrate_exchange,currency_sl;
whererate_exchange.外币代码=currency_sl.外币代码andcurrency_sl.姓名=thisform.text1.value;
orderby人民币数量desc;
intodbfdbfa
thisform.grid1.recordsource="
dbfa"
十四SETCENTURYON
SETDATETOYMD
SELECT客户.客户号,客户.身份证,客户.姓名,客户.工作单位,客房.客房号,房价.类型名,房价.价格;
FROM客户,房价,入住,客房;
WHERE客户.客户号=入住.客户号;
AND客房.客房号=入住.客房号;
AND房价.类型号=客房.类型号;
AND入住.退房日期>
=ctod（ThisForm.Text1.value）;
ORDERBY房价.价格DESC;
INTOTABLEtabd
十五1.ThisForm.Text1.Value=year（date（））
ThisForm.Command1.Enabled=.f.ThisForm.Test。
altertable教师表alter职工号setcheckLEFT（职工号,3）="
110"
2.CREATEsqlVIEWsalaryASSELECT教师表.系号,AVG（教师表.工资）AS平均工资FROM教师表;
GROUPBY教师表.系号ORDERBY2DESC
错误1：
将"
WHILE"
DOWHILE"
NEXT"
SKIP"
CASE"
IF"
十六1.Createtable分组情况表（组号c
（2）,组名c（10））
INSERTINTO分组情况表VALUES（"
01"
通俗唱法"
2.第1处：
第2处：
歌手表.歌手编号"
LEFT（歌手表.歌手编号，2）"
第3处：
INTO"
WITH"
3.SELECT*FROM评分表;
WHEREleft（评分表.歌手编号,2）=ThisForm.List1.list（ThisForm.List1.listindex）;
INTOTABLEtwo.dbf;
ORDERBY评分表.歌手编号DESC,评分表.分数
十七1.altertable教师表alter职工号setcheckLEFT（职工号,4）="
1102"
3.SELECTTOP3学院表.系名,avg（教师表.工资）as平均工资;
FROM学院表,教师表;
WHERE学院表.系号=教师表.系号;
GROUPBY学院表.系名;
ORDERBY2DESC;
INTOTABLEsa_three.dbf
*************************
SELECTTOP5学院表.系名,avg（教师表.工资）as平均工资;
INTOTABLEsa_five.dbf
十八1.INSERTINTOSCORE1（学号,课程号,成绩）VALUES（"
993503433"
0001"
99）
3.SETTALKOFF
OPENDATABASESCORE_MANAGER
SELECTCourse.课程名,AVG（Score1.成绩）as平均成绩;
FROMcourse,score1;
WHERECourse.课程号=Score1.课程号;
GROUPBYCourse.课程名;
ORDERBYCourse.课程名;
INTOTABLENEW_TABLE32
CLOSEALL
SETTALKON
十九1.select*from歌手表.dbf;
where歌手出生地=ThisFbo1.list（ThisFbo1.listindex）;
INTOTABLEbirthplace.dbf
3.SELECT歌手表.歌手姓名,avg（评分表.分数）as得分;
FROM歌手表,评分表;
WHERE歌手表.歌手编号=评分表.歌手编号;
ANDleft（歌手表.歌手编号,2）="
GROUPBY歌手表.歌手姓名;
ORDERBY2DESC,歌手表.歌手姓名DESC;
INTOTABLEfinal.dbf
二十2.第1处fromemployeepjoinemployeec;
第2处onp.组别=c.组别wherec.职务="
andc.姓名<
>
p.姓名;
3.x=ThisForm.textn.Value
a="
SELECTOrder.订单号,Order.客户号,Order.签订日期,Order.金额FROMorderWHEREOrder.职员号=xORDERBYOrder.签订日期INTOTABLEt"
+x
&
a
二一1.USE金牌榜
COPYSTRUTOGOLDENinsertintogoldenValue（"
011"
9,7,11）
2.SELECT国家.国家名称,COUNT（获奖牌情况.名次）AS金牌数;
FROM国家,获奖牌情况;
WHERE国家.国家代码=获奖牌情况.国家代码;
AND获奖牌情况.名次=1;
GROUPBY国家.国家名称;
ORDERBY2DESC,国家.国家名称DESC;
INTOTABLEtemp.dbf
2.2Select国家名称From国家IntoCursorLSB
3.SELECT国家.国家名称,COUNT（获奖牌情况.名次）AS奖牌总数;
FROM国家,获奖牌情况WHERE国家.国家代码=获奖牌情况.国家代码;
ORDERBY2DESC,国家.国家名称;
INTOTABLE假奖牌榜.dbf
REPORTFORMSPORT_REPORT.FRXPREVIEW
二二2.修改Text1的Value属性为"
=date（）"
表格的RecordSourcetype属性为"
4－SQL说明"
正确1：
setcenturyon4正确：
va=thisform.text1.value正确：
thisform.grid1.RecordSource=st
3.SELECTyear（orders.签订日期）as年份,month（orders.签订日期）as月份,;
sum（orders.金额）as合计;
FROMorders;
GROUPBY2,1;
HAVING合计>
=0;
ORDERBY1DESC,2;
二三3.SETTALKOFF
OPENDATABASEcj_m
SELECT*FROMtable3WHERE.f.INTOTABLEtemp
SELECT1
USExuesheng
INDEXON学号TAG学号
SELECT2
USEchengji
SETRELATIONTO学号INTOxuesheng
GOTOP
DOWHILE.NOT.EOF（）
IFchengji.数学<
60
INSERTINTOtempValues（xuesheng.学号,xuesheng.姓名,'
数学'
chengji.数学）
ENDIF
IFchengji.英语<
英语'
chengji.英语）
IFchengji.信息技术<
信息技术'
chengji.信息技术）
SKIP
ENDDO
SELECT*FROMtempORDERBY分数,学号DESCINTOARRAYarr
INSERTINTOtable3FROMARRAYarr
CLOSEDATABASE
CLOSETABLESALL
DROPTABLEtemp
SETTALKON
RETURN
二四1.ALTERTABLEs_tADDCOLUMN备注C（30）
ALTERTABLEs_tALTER年度SETDEFAULT"
2004"
2.将第5行改为：
（一季度利润＋二季度利润＋三季度利润＋四季度利润）/（一季度销售额＋二季度销售额＋三季度销售额＋四季度销售额）AS利润率；
将第6行改为：
FROMS_T，DEPT；
将第8行改为：
ORDERBY年度，利润率DESC；
将第9行改为：
INTOTABLES_SUM。
3.ThisForm.Grid1.RecordSource＝"
SELECT*FROMs_tWHERE年度＝'
＋str（thisform.Spinner1.value,4,0）＋"
'
intocursorlsb"
二五2.SELECTstock_name.股票简称,stock_sl.现价,stock_sl.买入价,stock_sl.持有数量;
FROMstock_name,stock_sl;
WHEREstock_sl.股票代码＝stock_name.股票代码Andstock_sl.现价>
stock_sl.买入价;
ORDERBYstock_sl.持有数量DESC;
INTOTABLEstock_temp
3.pinyin＝alltrim（thisform.text1.value）
opendatabasestock
usestock_name
locatefor汉语拼音＝pinyin
iffound（）
SELECT持有数量，股票简称；
FROMstock_sl,stock_name;
WHERE汉语拼音＝pinyinandstock_sl.股票代码＝stock_name.股票代码;
INTOarrayathisform.text1.value＝a[2]
thisform.text2.value＝a[1]
wait"
没有查询到，请重输"
windowtimeout2
清空"
thisform.text1.value="
thisform.text2.value="
二六1.wait"
mymethod"
window3）ThisForm.mymethod
3.SELECTXuesheng.民族,avg（Chengji.数学）asx,AVG（Chengji.英语）ASy;
FROMxuesheng,chengji;
WHEREXuesheng.学号=Chengji.学号ANDXuesheng.民族="
汉"
INTOARRAYa
INSERTINTOtable3FROMARRAYa
SELECTXuesheng.民族,avg（Chengji.数学）asx,AVG（Chengji.英语）ASy;
WHEREXuesheng.学号=Chengji.学号;
ANDXuesheng.民族!
INTOARRAYa
UPDATEtable3SET民族='
其他'
WHERE民族!
二七1.属性DEFAULTT。
ThisForm.Height=val（ThisForm.Text1.value）
2.SELECTBook.书名,Book.作者,Book.价格;
FROMbook,loans,borrows;
WHERELoans.借书证号=Borrows.借书证号;
ANDBook.图书登记号=Loans.图书登记号;
ANDBorrows.姓名="
田亮"
ORDERBYBook.价格DESC;
INTOTABLEbook_temp.dbf
3.ALTERTABLEORDERADD总金额N（7,2）
SELECTOrderitem.订单号,sum（go
升级会员 