VF上机题归类新
- 格式:doc
- 大小:162.50 KB
- 文档页数:14
上机题归类 基本操作(前四章) 1.建项目:11A1、12A1、21A1、22A1、45A2 2.建数据库:10A1、12A2、16A1、20A1、22A2、23A1、28A2、28C1、40A3、45A3、47A1、48A1 3.添加删除表(数据库)、数据库(项目):1A1、9A12、10A2、11A2、12A3、14A3、15A2(到项目)、19A1、20A2、21A2A3(到项目)、21A3、22A3(到项目)、25A1、27A1、28C2、34A1、44A2、45C1、46A1 4.建表:1A2(要关闭数据库)、28A1(与A9同做,设计完字段后单击确定,在弹出的对话框中选“是”,直接输入A9中的记录)、30C1、42C1、44A3、47A3、50A1 5.增加修改字段:2A1、8A1(与A9同做,加字段后不击确定,直接在默认值处写:部门号+雇员号+”@xxxx.com.cn”)、13A2、14A1、18A3(限定位置)、22A3、29A2、43A1、49A1、50A3 6.增加修改记录:8A3、28A3 7.建索引:7A4、9A3、16A23、18A1、19A2、25A3、27A2、29A4、34A2、38A2、42A1、44A1、46A23、47A2、48A2、50A2 8.有效性规则:2A2、8A2、9A4、11A4、13A3、18A2、19A3、37A4、38A1 9.默认值:13A4(先允许为NULL,再设置默认值为NULL)、25A2(默认值:date()) 10.永久联系:2A3、8A4、10A3、11A3、13A1、16A4、20A3、21A4、22A4、25A4、27A3、38A3、46A4、47A4、48A3、37A4 11.参照完整性:2A4、10A4、27A4、48A4 讲解题目:3AB、12、28、18、38、44、11、8、9、10、7A34、29(两步操作)、46、13、25、21、2A123、1A12 SQL命令归类(第五章) 1.SQL-SELECT: 17A1、49A3、24A1、4A4 17A1:select * from stock_sl into table stock_bk 49A3:select distinct * from taba into table tabc 2.SQL-INSERT:15A3、17A2、21B1(不是SQL—SELECT语句考点,不能用查询设计器做)、26A1、35A4、39A4 15A3:insert into score1 values(“993503433”,”0001”,99) 17A2:insert into stock_bk values(“600028”,4.36,4.60,5500) 21B1:update 教师 set 新工资=原工资*1.2 where 职称=”教授” update 教师 set 新工资=原工资 where 职称!=”教授” insert into 教师 values(“林红”,”讲师”,10000,10200) 26A1:insert into 零件信息 values(“p7”,”PN7”,1020) 35A4:insert into golden values(”011”,9,7,11) 39A4:insert into 分组情况表 values(“01”,”通俗唱法”) 注:先做A3 3.SQL-UPDATE:16C2、17A3、18A4、21B1、24A2、26A3、34A4、36A4、49A2 16C2:update books_bak set 价格=价格*0.95 17A3:update stock_bk set 现价=8.88 where 股票代码=”600007” 18A4:update 学生 set 出生日期={^1983/05/01} where 姓名=”王三风” 注:先做A3 21B1:update 教师 set 新工资=原工资*1.2 where 职称=”教授” update 教师 set 新工资=原工资 where 职称!=”教授” insert into 教师 values( “林红”,”讲师”,10000,10200) 24A2:update rate_exchange set 卖出价=829.01 where 外币名称=”美元” 26A3:update零件信息 set 单价=1090 where 零件号=”p4” 34A4:update 金牌榜 set 奖牌总数=金牌数+银牌数+铜牌数 36A4:update teacher set 工资=8000 where 姓名=”Jack” 49A2:update tabb set 日期={^2005-10-1} 注:先做A1 4.SQL-DELECT:17A4、26A2 17A4:delete from stock_bk where股票代码=”600000” 26A2:delete from 零件信息 where 单价<600 5.SQL-CREATE:35A3、39A3 35A3:create table golden free(国家代码 c(3),金牌数 I, 银牌数 I, 铜牌数 I) 39A3:create table 分组情况表free(组号 c(2),组名 c(10)) 6.SQL-ALTER:1A4、29A3、34A3、36A3、40A4 29A3:alter table student add unique 学号 34A3:alter table 金牌榜add 奖牌总数 I check奖牌总数>=0 36A3:alter table 学院表 add 教师人数 I check 教师人数>=0 40A4:alter table 评委表 alter 评委编号 set check left(评委编号,2)=”11” 先做A3 查询归类(第六章) 注:查询设计器的“筛选“选项卡,即WHERE短语之后不能用的函数为:COUNT、SUM、AVG、MAX、MIN。 1.查询向导:15A1 2.只保存查询文件(只要.qpr文件):1A3、12A4、17B1、26C1(一升一降) 3.只需设置查询去向(只要.dbf文件):7B1、13B1、14A4、14B1、16C13 14A4:select * from score1 order by 学号,成绩 desc into table new_order 16C1:select * from books where 书名 like “%计算机%” into table books_bak 4.既需保存查询文件,又需设置查询去向(同时需要.qpr文件和.dbf文件): 21B2、24B2、30B1、31B1(分组:性别)、32B1、34B1、38B1、41B1、42B1、43B1、44B1(两个分组条件)、47B2、46B2、48B2 5.要求用SQL建立查询,但无需保留语句:9B1、10B1(分组时满足条件)、11B1、12B1、23B2、40B2、45B2 6.要求用SQL建立查询,且要求把语句保存到txt文件中:2B1、18AB1(筛选、分组时满足条件)、19B1、22B1、24A1、4A4 7.要求用SQL建立查询,且要求把语句保存到prg文件中: 25B2、28AB、35B1、38A4、43A4、50B2 8.建立视图(一定要先打开数据库设计器):2B2、8C1、15B1、18C1、22B2、23B12、34B2、36B2、39B2、45C2 9.用SQL语句建立视图:37B1、2B2 10.先建立视图再据视图建立查询:30B1(year(出生日期)=1982)B2、32B12、33B12、42B12、27B2 程序归类(第七章) 1.程序改错:7A12、17B2、18B2、20B1、25B1、26B1、29B2、36B1、38B2、39B1、50B1 7A1:select * from 销售表 to dbf 销售表2001 where 日期<={^2000-12-31} into 7A2 close all delete 销售表 where 日期<={^2000-12-31} from pack
17B2:modi.prg SELECT COUNT((现价-买入价)*持有数量) ; sum FROM stock_sl ; WHERE 股票代码 ; = ; in (SELECT 股票代码 FROM stock_name ; WHERE "银行" LIKE 股票简称) $ 18B2:modi.prg ***********Error*********** MODIFY TABLE 学生 ADD 平均成绩 N(6,2) alter SELECT 学生 ***********Error*********** DO WHILE EOF() not SELECT AVG(成绩) FROM 选课 WHERE 学号=学生.学号 INTO ARRAY cj ***********Error*********** REPLACE 平均成绩 = cj[1] with
20B1:rate_pro.prg &&****ERROR**** FIND FOR 姓名=”林诗因” locate summ=0 &&****ERROR**** WHILE NOT EOF( ) do &&****ERROR**** summ=summ+a[1]*rate_exchange.持有数量 去掉
25B1: modi1.prg ***在下一行添加一条打开customer表的语句, 然后把"(此处空行)"删除 (此处空行) use customer ***表没有索引,修改如下语句使之能显示所有“北京”客户的信息 SCAN WHILE 所在地='北京' for ? 客户编号,公司名称,联系人姓名 ENDSCAN
26B1: modi1.prg SELECT 零件名称 FROM 零件信息 WHERE 零件号 = ; in (SELECT 零件号 FROM 使用零件; GROUP BY 项目号 HAVING COUNT(项目号) = 3) ; 零件号 ORDER BY 零件名称 ; INTO FILE results to
29B2:modi2.scx “计算”按钮: *******************found******************** x,s1,s2,s3=0 store 0 to x,s1,s2,s3 *******************found******************** x=thisform.text1 x=val(thisform.text1.value) do while x>0 if int(x/2)=x/2 s1=s1+1 else s2=s2+1 endif *******************found******************** if div(x,3)=0 if mod(x,3)=0 s3=s3+1 endif x=x-1 enddo thisform.text2.value=s1 thisform.text3.value=s2 thisform.text4.value=s3