VF试题Word文件下载.docx
- 文档编号:16773428
- 上传时间:2022-11-26
- 格式:DOCX
- 页数:22
- 大小:179.17KB
VF试题Word文件下载.docx
《VF试题Word文件下载.docx》由会员分享,可在线阅读,更多相关《VF试题Word文件下载.docx(22页珍藏版)》请在冰豆网上搜索。
表单设计器"
窗口中,释放鼠标,即可生成表格名称为grdSalarys的表格。
综合应用双击"
生成"
按钮,在"
Command1.Click"
编辑窗口中编写相应的程序
opendatabasesalary_db
docase
casethisForm.optiongroup1.value=1&
&
"
雇员工资表"
select*fromsviewintotablegz1
casethisForm.optiongroup1.value=2&
"
部门表"
select*fromdeptintotablebm1
casethisForm.optiongroup1.value=3&
部门工资汇总表"
SELECTsalarys.部门号,部门名,sum(工资)工资,sum(补贴)补贴,sum(奖励)奖励,sum(失业保险)失业保险,sum(医疗统筹)医疗统筹;
FROMsalarys,dept;
WHEREsalarys.部门号=dept.部门号;
GROUPBYsalarys.部门号intotablehz1
endcase
closeall
creatview视图名asSQL语句
78套综合应用1
77套综合应用1CREATEVIEWsviewAS;
SELECTSTUDENT.学号,姓名,AVG(成绩)平均成绩,MIN(成绩)最低分,COUNT(*)选课门数;
FROMSTUDENT,SC;
WHERESTUDENT.学号=SC.学号;
GROUPBYSTUDENT.学号HAVINGCOUNT(*)>
3;
ORDERBY平均成绩DESC
CLOSEALL
76套简单应用1--SELECT*FROMorder_listWHERE总金额>
(SELECTAVG(总金额)FROMorder_list)ORDERBY客户号INTOTABLEresults
2报表-快速报表(关于快速报表)综合应用12
75综合应用1---为表增加新字段altertable+表名addcolumn+字段名
Update表名set字段的变化
UPDATEorder_detailSET新单价=单价*0.9WHERE订单号=(SELECT订单号FROMorder_listWHERE订单号=order_detail.订单号ANDYEAR(订购日期)=2001)
UPDATEorder_detailSET新单价=单价*1.1WHERE订单号=(SELECT订单号FROMorder_listWHERE订单号=order_detail.订单号ANDYEAR(订购日期)=2002)
74简单应用1—把customer1中的记录全部追加到customer表中-------USEcustomer
APPENDFROMcustomer1
Passwordchar----用户输入的是字符还是占位符,并且显示用作占位符的字符
综合应用(报表设计器)
73套简单应用1综合应用未懂得
72套综合应用(未懂得)
71套简单应用1--并在"
快捷菜单设计器-scmenu_d-时间过程"
编辑窗口中输入"
myform_da.caption=time()"
。
并在"
快捷菜单设计器-scmenu_d-日期过程"
myform_da.caption=dtoc(date())"
双击"
属性"
的RightClickEvent处,在其编辑窗口中输入"
doscmenu_d.mpr"
并关闭编辑窗口。
综合应用3--:
确定"
命令按钮,在确定编辑窗口中输入命令组,接着关闭编辑窗口。
IFthisform.optiongroup1.option1.value=1
IFthisform.check1.value=1
SELECT*FROMemployeeINTOTABLEtemp
ELSE
SELECT*FROMemployee
ENDIF
IFthisform.check1.value=2
SELECT*FROMordersINTOTABLEtemp
SELECT*FROMorders
70套综合应用1不懂
69套简单应用1不懂--【操作步骤】
在命令窗口输入以下语句。
SELECT*;
FROMorders;
ORDERBY金额;
WHERE职工号+str(金额,10,0)IN;
(SELECT职工号+str(MAX(orders.金额),10,0);
GROUPBY职工号);
INTOTABLEresults2---在命令窗口输入以下语句。
CREATEviewview_basSELECT*FROMemployeeWHERE职工号NOTIN(SELECT职工号FROMorders)ORDERBY仓库号DESC
68——简单应用2为所有商品编码首字符是“3”的商品计算销售价格,销售价格是在进货价格的基础上加22.68%----------UPDATE商品SET销售价格=进货价格*(1+0.2268)WHEREsubstr(商品编码,1,1)="
3"
综合应用2在"
中,双击确定命令按钮,在"
Command2.Click"
编辑窗口中输入下列语句,接着关闭编辑窗口。
DOCASE
CASETHISFORM.OPTIONGROUP1.VALUE=1
SELECT*FROM商品WHERE分类编码=ANY(SELECT分类编码FROM分类WHERE分类名称="
饮料"
)
CASETHISFORM.OPTIONGROUP1.VALUE=2
调味品"
CASETHISFORM.OPTIONGROUP1.VALUE=3
酒类"
CASETHISFORM.OPTIONGROUP1.VALUE=4
小家电"
ENDCASE
67——基本操作3,为“文件”下的子菜单项“查找”设置访问键F(显示方式为“查找F”)--------选择子菜单"
查找"
并修改其菜单项为"
查找\<
F"
,最后保存菜单。
简单应用2(最后一部分-在报表标题带区的右端利用OLE对象插入文件picture)在报表控件里面-图片绑定控件
综合应用不懂
综合应用即使题目没告诉也要将表添加到数据环境中
如果命令按钮是SQL语句的话,勿忘记设置表单的recordsource属性4—SQL说明
66——基本操作3--CREATETABLErate(币种1代码C
(2),币种2代码C
(2),买入价N(8,4),卖出价N(8,4))
简单应用1不懂综合应用不懂thisform.grid1.recordsource="
SELECT*FROM外汇账户WHERE钞汇标志='
+iif(thisform.myOption.value=1,"
现汇"
"
现钞"
)+"
'
INTOcursorlsb"
65——综合应用(查询按钮)不懂在"
中,双击查询命令按钮,在"
输入语句如下所示。
SELECT姓名,年龄,性别,家庭地址;
FROMp_t;
WHERE户主编号=alltrim(ThisForm.Text1.Value);
INTOarraytmp
ThisForm.Text2.Value=tmp
(1)
ThisForm.Text3.Value=tmp
(2)
ThisForm.Text4.Value=tmp(3)
ThisForm.Text5.Value=tmp(4)
ThisForm.Grid1.RecordSource="
SELECT土地编号,小地名,面积,树种编号,蓄积,承包年度FROMfr_tWHERE户主编号='
+alltrim(ThisForm.Text1.Value)+"
INTOCURSORLSB"
63——简单应用2(关于班长名student.姓名AS班长名"
和班主任名teacher.教师名AS班主任名"
62——简单应用2不懂综合应用(录取按钮的编写)不懂closeall
CREATETABLEtest(考生号C(4),政治成绩N(5,1),外语成绩N(5,1),高数成绩N(5,1),专业课成绩N(5,1),总成绩N(5,1))
use
select2
usetest
select1
usekscjb
dowhile.not.eof()
selecttest
locatefor考生号=kscjb->
考生号
ifnotfound()then
appendblank
replace考生号withkscjb->
endif
casekscjb->
考试科目="
101"
replace政治成绩withkscjb->
成绩
102"
replace外语成绩withkscjb->
103"
replace高数成绩withkscjb->
104"
replace专业课成绩withkscjb->
selectkscjb
skip
enddo
updatetestset总成绩=政治成绩+外语成绩+高数成绩+专业课成绩
SELECTKsb.考生号,Ksb.姓名,Ksb.性别,Ksb.单位,Test.政治成绩,;
Test.外语成绩,Test.高数成绩,Test.专业课成绩,Test.总成绩;
FROMsdb!
ksbINNERJOINtestONKsb.考生号=Test.考生号;
WHERETest.总成绩>
=330;
ORDERBYTest.总成绩DESC;
INTOTABLEfour
61——简单应用1(查询年份的设置在"
表达式生成器"
对话框的表达式处输入"
Year(cbc.日期)"
,在实例处输入"
2003"
)2(程序的修改)综合应用(统计按钮)--在"
中,双击统计命令按钮,在"
编辑窗口中输入SQL的SELECT命令查询语句,接着关闭编辑窗口。
输入语句如下。
UPDATECUSSET会员类型="
金卡会员"
WHERE会员号=ANY(SELECT会员号FROMcbcGROUPBY会员号HAVINGSUM(数量*单价)>
=15000)
银卡会员"
WHERE会员号=ANY(SELECT会员号FROMcbcGROUPBY会员号HAVINGSUM(数量*单价)<
15000ANDSUM(数量*单价)>
=10000)
铜卡会员"
10000ANDSUM(数量*单价)>
=5000)
普通会员"
5000)
59——简单操作2综合应用SELECTStudent.学号,Student.姓名,AVG(成绩)AS平均成绩,MIN(成绩)AS最低分;
studentINNERJOINsdb!
scONStudent.学号=Sc.学号;
GROUPBYStudent.学号HAVINGMIN(成绩)>
=60;
(最小的成绩都大于60,则其他几门课程肯定大于60)
ORDERBYStudent.学号;
INTOTABLEfour.dbf
57——基本操作2不懂inputmask按钮3readonly按钮4简单应用1不懂综合应用-----在表单的load事件中执行菜单程序mumenu.mpr-----,双击"
LoadEvent"
,在"
goods.Load"
domymenu.mpr"
InitEvent"
myform.Init"
domymenu.mprwiththis,'
xxx'
,启动菜单命令。
双击DestroyEvent,在"
myform.Destroy"
releasemenuxxxextended"
,在表单退出时释放菜单。
步骤5:
子菜单的"
结果"
中选择"
过程"
并输入命令下列语句:
myform.grid1.recordsource="
select*fromproductswhere分类编码='
4001'
intocursorlsb"
步骤6:
myform.grid1.recordsource="
1001'
步骤7:
3001'
56——简单应用1-SELECTTOP5姓名,出生日期;
FROMemployee;
ORDERBY出生日期;
(按年龄降序,即按出生日期升序)
INTOTABLEemage
2综合应用步骤4:
中,依次建立Text1、Text2和Text3三个文本框,Text3的Enable(指定表单或控件能否由用户相应引发的事件)属性选择"
.F-假
计算"
编辑窗口中输入下列程序
casethisForm.optiongroup1.value=1
thisForm.Text3.Value=val(thisForm.Text1.Value)+val(thisForm.Text2.Value)
casethisForm.optiongroup1.value=2
thisForm.Text3.Value=val(thisForm.Text1.Value)-val(thisForm.Text2.Value)
casethisForm.optiongroup1.value=3
thisForm.Text3.Value=val(thisForm.Text1.Value)*val(thisForm.Text2.Value)
casethisForm.optiongroup1.value=4
thisForm.Text3.Value=val(thisForm.Text1.Value)/val(thisForm.Text2.Value)
55——基本操作3--为“隐藏”命令按钮添加代码,使表单运行时,单击此按钮隐藏表单上标签控件label1--在"
中,双击"
隐藏"
命令按钮,在其编辑窗口中输入"
thisform.label1.visible=.F."
简单应用双击"
DestroyEvent"
操作完毕后运行表单。
综合应用
步骤4:
中,选定List1控件,在其"
对话框的RowSourceType处选择"
6-字段"
,在RowSource处选择"
课程.课程名"
,双击ClickEvent事件,在"
List1.Click"
编辑窗口中,输入下列语句:
aa=课程.课程名----将结果存储在以课程名命名的表中
SELECTCOUNT(*)AS人数;
FROM考试成绩;
WHERE考试成绩.课程编号=课程.课程编号;
INTOTABLE&
aa----将结果存储在以课程名命名的表中
54——基本操作4----为student表增加一个年龄字段,字段为数值型
(2)(4)在命令窗口输入以下语句。
Closeall
ALTERTABLEstudentADDCOLUMN年龄N
(2)
简单应用1----打开程序modi1.prg。
修改程序如下:
第1处:
判断是否找到,所以应改为:
DOWHILEFOUND()
第2处:
如果是"
女"
,则继续,所以应改为:
LOOP
第3处:
继续查找下一个,所以应改为:
CONTINUE
综合应用不懂
53——基本操作4-把课程表中课程名为数据库的课程的任课教师改为“T2222”------UPDATE课程SET任课教师="
T2222"
WHERE课程名="
数据库"
简单应用-1不懂-,再双击此计时器控件,在"
Timer1.Timer"
编辑窗口中输入下列命令组,再关闭此窗口。
thisform.Label1.Left=thisform.label1.Left-10
IfTHISFORM.Label1.Left<
=-THISFORM.Label1.WidthThen
thisform.label1.Left=thisform.WIDTH
ENDIF
2-在"
函数和表达式"
文本框中输入"
count(*)as选课人数"
并单击"
添加"
按钮。
显示-常规选项-顶层表单
综合应用=在表单的表格控件中显示课程表的内容------myform.grid1.RecordSource="
课程"
在表单的表格控件中显示视图sview中的内容----myform.grid1.RecordSource="
sview"
预览报表creport----reportformcreportpreview"
步骤9:
单击常用工具栏中的"
打开"
按钮,打开myform表单。
中,在其"
的ShowWindow处选择"
2-作为顶层表单"
;
Form1.Load"
,启动菜单命令;
52——职工号的最左边四位字符是“1102”——在"
字段有效性"
框的"
规则"
中输入"
Left(职工号,4)="
1102"
x=ThisForm.Pageframe1.Pbo1.Value
ifThisForm.Pageframe1.Page2.Optiongroup1.Value=1
SELECT学院表.系名,学院表.系号,avg(教师表.工资)as平均工资;
FROM学院表,教师表;
WHERE学院表.系号=教师表.系号;
AND学院表.系名=x;
GROUPBY学院表.系号;
INTOTABLEsalary.dbf
else
SELECT学院表.系名,学院表.系号,sum(教师表.工资)as总工资;
FROM学院表,教师表;
WHERE学院表
- 配套讲稿:
如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。
- 特殊限制:
部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。
- 关 键 词:
- VF 试题