VFP二级上机真题精选
第8套简单应用2知识点:知识点:用命令创建视图提示:必须先打开数据库,再创建视图,其中select语句可用
查询设计器生成代码为:createviewview_cbas;SELECTEmployee.职工号,Employee.,sum(Orders.金额)as总金额;FROMorders_manage!employeeINNERJOINorders_manage!orders;ONEmployee.职工号=Orders.职工号;GROUPBYEmployee.职工号;HAVING总金额>=15000;ORDERBY3第60套简单应用1知识点:计时器、选择结构、知识点:计时器、选择结构、left及width属性应用Timer1的Timer事件中代码为:ifthisform.label1.left<-thisform.label1.widththisform.label1.left=thisform.widthelsethisform.label1.left=thisform.label1.left-10endif提示:若只写一句thisform.label1.left=thisform.label1.left-10也可得满分第10套简单应用1知识点:选择结构、循环结构与命令修改表记录修改表记录、知识点:选择结构、循环结构与REPLACE命令修改表记录、函数和表达式FOUR.PRG
程序文件中代码为:closeallusetabascanifb*b-4*a*c>=0m=(-b+sqrt(b*b-4*a*c))/(2*a)n=(-b-sqrt(b*b-4*a*c))/(2*a)replacex1withm,x2withnelsereplacenotewith"无实数解"endifendscan第41套简单应用1知识点:查询、分组(要避免分组的弊端)知识点:查询、分组(要避免分组的弊端)SELECTOrders.职工号,MAX(Orders.金额)AS最高金额;FROMorders;GROUPBYOrders.职工号;INTOTABLEaa.dbfSELECTOrders.*;FROMordersINNERJOINaa;ONOrders.职工号=Aa.职工号;
第1页共4页
VFP二级上机真题精选
WHEREOrders.金额=最高金额;ORDERBYOrders.金额;INTOTABLEresults.dbf提示:两次查询都可以通过查询设计器第74套简单应用1知识点:表单中建立快捷菜单、知识点:表单中建立快捷菜单、time()及date()函数类型及函数类型菜单设计器的“时间”过程中输入myform_da.caption=time()“日期”过程中输入myform_da.caption=dtoc(date())在表单的RightClick事件中命令:doscmenu_d.mpr第74套综合应用知识点:选项按钮组、复选框、选择结构程序设计、简单查询知识点:选项按钮组、复选框、选择结构程序设计、简单查询“确定”按钮中代码为:a=thisform.optiongroup1.valueb=thisform.check1.value
docasecasea=1andb=0select*fromemployeecasea=1andb=1select*fromemployeeintodbftempcasea=2andb=0select*fromorderscasea=1andb=1select*fromordersintodbftempendcase第28套综合应用知识点:文本框、表格控件、查询去向为数组、追加记录、知识点:文本框、表格控件、查询去向为数组、追加记录、删除表记录“查询”按钮中代码为:x=alltrim(thisform.text1.value)SELECTStock_sl.持有数量,Stock_name.股票代码,;(现价-买入价)*持有数量as浮亏金额;FROMstock!stock_slINNERJOINstock_name;ONStock_sl.股票代码=Stock_name.股票代码;WHEREStock_name.汉语拼音=x;int
oarrayathisform.text2.value=a[1]insertintostock_fkvalues(a[2],a[3])“清空”按钮中代码为:deletefromstock_fkpack第41套综合应用知识点:页框、表格控件、数据环境、知识点:页框、表格控件、数据环境、查询Page1和Page2利用数据环境直接拖拽表,Page3中画一个表格控件Grid1并将
第2页共4页
VFP二级上机真题精选
RecordSourceType属性设置为4-SQL说明,表单的INIT事件中代码为:thisform.pageframe1.page3.grid1.recordsource=";SELECTEmployee.职工号,Employee.,sum(Orders.金额)as总金额;FROMemployeeINNERJOINorders;ONEmployee.职工号=Orders.职工号;GROUPBYEmployee.职工号;INTOCURSORAA"第39套综合应用知识点:
列表框、查询、宏代换知识点:列表框、查询、a=thisform.list1.valueSELECT教师表.职工号,教师表.,教师表.工资;FROM
课程管理!教师表INNERJOIN课程管理!表;ON教师表.系号=表.系号;WHERE表.系名=a;ORDERBY教师表.职工号;INTOTABLE&;a第3套综合应用知识点:
系统下拉菜单(追加)左联接查询、更新记录知识点:系统下拉菜单(追加)左联接查询、、左联接查询、菜单项"计算"中过程代码为:SELECTOrderitem.商品号,Orderitem.数量;FROMorderINNERJOINorderitem;ONOrder.订单号=Orderitem.订单号;WHEREYEAR(Order.签订日期)=2001;INTOTABLEx.dbfSELECTGoods.商品名,SUM(Goods.单价*X.数量)AS总金额;FROMgoodsLEFTOUTERJOINx;ONGoods.商品号=X.商品号;GROUPBYGoods.商品号;ORDERBYGoods.商品名;INTOTABLEtablethree.dbfupdatetablethreeset总金额=0where总金额ISNULL提示:2次查询代码可以用查询设计器生成第12套综合应用知识点:顶层表单的菜单、表格控件、知识点:顶层表单的菜单、表格控件、查询菜单的常规选项设置为“顶层表单”表单的showwindow属性设置为2表单的LOAD过程代码为:domymenu.mprwiththis,.T.菜单项"小家电"中过程代码为:myform.grid1.recordsource=';SELECTProducts.*;FROMpdtmng!categoryINNERJOINpdtmng!products;ONCategory.分类编码=Products.分类编码;