VFP机考复习资料.doc

《VFP机考复习资料.doc》由会员分享，可在线阅读，更多相关《VFP机考复习资料.doc（14页珍藏版）》请在淘文阁 - 分享文档赚钱的网站上搜索。

1、VFP-SQL语句部分1、 创建表CREATE TABLE - SQL命令该命令的一般格式为：CREATE TABLE |dbf （字段名1 字段类型（字段宽度，小数位数），字段名2 字段类型（字段宽度，小数位数）、例：CREATE TABLE xscj(xh c(8),xm c(6),xb c(2),;cj n(5,1),ksrq d)补充：C：字符型Y：货币型N：数值型D：日期型T：日期时间型L：逻辑型M：备注型G：通用型CREATE TABLE-SQL 命令创建数据库表命令一般格式：Create table 表名1 free ( 字段名1 字段类型代号 (字段宽度,小数位数 ) null

2、 | not null check 字段规则1 error “信息1” default 默认值primary key | unique references 表名2 tag 索引标识1 , 字段名2 字段类型代号 (字段宽度 , 小数位数) null | not null check 字段规则2 error “信息2” default 默认值 ) | from array 数组名使用示例：create data xscjgl & 创建学生成绩管理数据库create table xs (;xh c(4) default 1201 primary key,; & primary key主索引xm

3、c(6),;xb c(2) check xb=男 or xb=女 error性别只能是男或女 default 女,;nl n(2) null) & 创建学生表create table kc (;kch c(3) unique, ; & unique唯一索引kcm c(10),;xf n(3,1),;bxk l) & 创建课程表create table cj(;xh c(4) default 1201 reference xs tag xh, ;kch c(8),;ksrq d,;cj n(5,1) & 创建成绩表modi dataalter table cj add primary key x

4、h+kch+str(cj,4,1) tag dh & 为成绩表添加一个主索引2、 修改表结构表ALTER TABLE - SQL命令功能：见书P102命令格式示例：添加字段ALTER TABLE xscj ADD COLUMN kcmc C(14) 重命名字段 ALTER TABLE xscj RENAME COLUMN kcmc TO kc 删除字段 ALTER TABLE xscj DROP COLUMN kc修改字段：ALTER TABLE xscj ALTER COLUMN cj(4,1)补充：ALTER TABLE SQL语句如果对表进行操作就不用加COLUMN。如：ALTER TA

5、BLE JS SET CHECK gzrqcsrq;ERROR出生日期必须大于工作日期 &设置表的有效性ALTER TABLE JS DROP CHECK &删除表的有效性规则ALTER TABLE JS ADD PRIMARY KEY jybh TAG jybh &增加一个主索引3、 插入表数据INSERT-SQL命令该命令的一般格式为：INSERT INTO （字段名1，字段名2 ） VALUES （表达式1，表达式2 ）例：INSERT INTO xscj（xh，xm，cj） VALUES （, 张良, 85.5）4、 更新表数据UPDATE-SQL 命令命令格式： UPDATE SET

6、 字段1 = 表达式1 ，字段2 = 表达式2 WHERE 条件表达式例： UPDATE xscj SET cj = cj*1.05 WHERE cj805、 删除表数据DELETE-SQL 命令。命令格式： DELETE FROM WHERE 条件表达式例： DELETE FROM xscj WHERE cj DELETE 不能删除个别的字段，它对于给定表只能整个记录整个记录地删除.2 与 INSERT 和 UPDATA 一样, 删除一个表中的记录可能会导致与其他表的引用完整性问题. 当对数据库进行修改时一定在头脑中有这个概念.3 DELETE 语句只会删除记录, 不会删除表. 如果要删除表

7、需使用 DROP TABLE 命令.6、 查询记录SELECT-SQL命令创建查询常用的格式：SELECT 表名1. 字段名1 AS 标题名1, 表名1. 字段名2 AS 标题名2, FROM 数据库名! 表名1 ，数据库名! 表名2 , 数据库名! 表名3 TO FILE 文本文件名 | into table | into cursor 表文件名 WHERE 选定条件GROUP BY 分组字段名 HAVING 分组中的满足条件 ORDER BY 排序字段名1 ASC | DESC , 排序字段名2 ASC | DESC .示例：浏览学生中的查询学生 student.qpr :SELECT 表

8、xs.xh as 学号, 表xs.xm as 姓名, 表xs.xb as 性别, 表xs.csrq as 出生日期, 表xs.bj as 班级名称;FROM 数据test!表xs;WHERE 表xs.bj =cs1;ORDER BY 表xs.xh;INTO TABLE xs浏览成绩中的按课程查询 sub_cj.qpr :SELECT 表xs.bj as 班级名称, COUNT(表xs.xh) as 班级人数, AVG(表cj.cj) as 平均分, ;MAX(表cj.cj) as 最高分, MIN(表cj.cj) as 最低分;FROM 数据test!表xs, 数据test!表cj, 数据te

9、st!表kc;WHERE 表cj.xh = 表xs.xh;AND 表kc.kcm = 表cj.kcm;AND 表cj.kcm = sc1;GROUP BY 表xs.bj;ORDER BY 表xs.bj;INTO TABLE sub_cj补充：子查询：见书P125UNION组合查询：见书P125，组合查询必须用SQL语句实现，请大家着重看下。SELECT DISTINCT表示只显示一次SELECT TOP5表示显示前五条记录7、 创建视图CREATE SQL VIEW 命令创建视图打开数据库，用命令来创建视图：OPEN DATABASE 数据库名CREATE SQL VIEW 视图文件名 AS

10、SQL-SELECT 语句例: OPEN DATABASE SJ CREAT SQL VIEW SCORE AS SELECT SJCJ.XH, SJCJ.CJ ;FROM SJ!SJCJ WHERE SJCJ.KCH=”计算机基础”8、 索引一、建立索引文件: 格式:index on 索引关键字|tag 索引名|to 索引文件名 说明:(1).tag 索引名：指定索引名，此索引存放在与表名相同的.cdx文件中。 (2).to 索引文件名：选择此项生成独立索引，即一个索引存放在一个索引文件中；否则生成的是结构化复合索引。例1：建立“工资情况”表的结构化复合索引文件，其索引关键字分别为姓名和工资

11、，而索引名分别为xm和gz. use 工资情况 browse index on 姓名 tag xm index on 工资 tag gz browse &分别执行以上命令后，生成了“工资情况.cdx”文件，其中存放了xm和gz两个索引。 例2:用“姓名”作索引关键字，建立“职工档案.dbf”的独立索引文件，文件名为a.idx。 use 职工档案 index on 姓名 to hello &执行此命令，检查默认目录e:myvfp,会发现多了一个文件：hello.idx use 二、打开索引：打开表时，系统会自动打开结构化复合索引，但此时显示的仍是物理顺序。要使索引起作用，必须指定主控索引。主控索

12、引就是控制当前显示顺序的索引。也可以在打开表的同时指定主控索引。1.打开表的同时打开索引并指定主控索引： 格式：use 表名 index 索引文件名 order tag 顺序号|索引名 说明:(1).index 索引文件名：用于打开独立索引文件。(2).order tag 顺序号|索引名：用于打开结构化复合索引。其中，顺序号为该索引在复合索引文件中的先后顺序，即在“表设计器”的“索引”选项卡中看到的该索引的位置。例：在命令窗口输入以下命令依次执行： use 职工档案 index hello &打开表的同时打开独立索引hello browse &显示的是按姓名索引的顺序，use use 工资情况

13、 order tag 2 &显示的是gz索引的顺序，因为gz在“表设计器”中位置为2，use 2.打开表后再打开索引： 格式1：set index to 索引文件名 功能:打开独立索引文件 格式2:set order to 顺序号|tag 索引名 功能：打开结构化复合索引 例：在命令窗口依次执行以下命令： use 职工档案 brow &显示物理顺序，set index to hello &打开独立索引文件hello.idx browse &显示的是按姓名索引的顺序，use use 工资情况 browse &显示物理顺序 set order to 1 &即将xm指定为主控索引，因为xm在“表设计

14、器”中位置为1，browse &显示按姓名索引的顺序，set orer to gz &将gz指定为主控索引 browse &显示的是gz索引的顺序，use 三、关闭索引： 格式1:set index to 格式2:set order to 说明:上两条命令后不加选项，可关闭当前索引。格式1用于关闭独立索引，格式2关闭复合索引。索引关闭后，表仍处于打开状态，显示物理顺序。四、删除索引：1.独立索引文件的删除：用删除文件的方法删除，在“我的电脑”中找到对应的.idx文件，将其删除即可。2.复合索引文件的删除：格式1:delete tag all 格式2:delete tag 索引名说明:格式1删除

15、复合索引文件中的所有索引，格式2删除复合索引文件中的指定索引。一个复合索引文件中的所有索引都被删除后，该复合索引文件即自动删除了。VFP程序设计部分课堂例题例1：求1/2+2/3+3/5+前20项的和程序：clears=0p=1q=2for i=1 to 20s=s+p/qt=pp=qq=t+qendfor?s=+str(s,10,6)?i=+str(i)例2：判断某数是否为素数程序：clear input 输入一个数： to nfor i=2 to int(sqrt(n)+1)if n%i=0exitendifendforif n=2?alltrim(str(n)+是一个素数elseif i

16、int(sqrt(n)+1)?alltrim(str(n)+是一个素数else?alltrim(str(n)+不是一个素数endifendif例3：scan语句对比程序：clearuse xsgo 1scan for xb=女 and xdh=01?xh,xm,xb,xdhendscan第二种程序：clearsele xsgo 1do while eof ()=.f.if xb=女 and xdh=01?xh,xm,xb,xdhendifskipenddo例4：将星期输出为“日一二三四五六”。程序：cleardatt(date()datt(2009-5-5)function dattparam

17、eters datda=日一二三四五六i=dow(dat)?星期+substr(da,i*2-1,2)endfunc例5：计算所给英语句子中的单词数。程序：clearinput 输入一个英语句子： to stri=1count=0word=0for i=1 to len(str)ch=substr(str,i,1)if ch= word=0elseif word=0count=count+1word=1endifendifendfor?单词的个数：+alltrim(str(count)例6：字符串中每个字母出现的次数程序：clearinput 输入英语句子： to strfor i=1 to

18、26ch=chr(i+96)n&ch=0endforother=0for i=1 to len(str)ch=substr(str,i,1)if between(ch,a,z) or between(ch,A,Z)n&ch=n&ch+1elseother=other+1endifendforfor i=1 to 26ch=chr(i+96)if n&ch!=0 ?ch+出现过+alltrim(str(n&ch)+次endifendfor?other+出现过+alltrim(str(other)+次各种函数的实现1、ABS程序：clear input 一个数：to aif a0?aelse?-a

19、endif2、MAX和MIN由于牵扯到数组应该不会考，下面写一个三个数比较的代码，以MAX函数为例。程序：clearinput to ainput to binput to cmax=aif maxb max=bendifif max=0t=t-benddot=t+b?alltrim(str(a)+除以+alltrim(str(b)+的余数为：+alltrim(str(t)4、ALLTRIM、LTRIM、RTRIMALLTRIM可以由LTRIM和RTRIM组成，所以下面我写的是LTRIM和RTRIM的代码，组合后就是ALLTRIM的代码。LTRIM程序：clearinput 输入一个英语句子：

20、 to strch=left(str,1)l=len(str)do while ch= l=l-1str=right(str,l)ch=left(str,1)enddo?strRTRIM程序：clearinput 输入一个英语句子： to strch=right(str,1)l=len(str)do while ch= l=l-1str=left(str,l)ch=right(str,1)enddo?str联想：去除字符串中所有空格程序：input 输入一个字符串： to strp=space(0)for i=1 to len(str)ch=substr(str,i,1)if ch!= p=p

21、+chendifendfor?str+去掉所有空格后为+p5、LEN程序：clearinput 输入一个字符串： to strp=space(0)len=0do while p!=strlen=len+1p=p+substr(str,len,1)enddo?字符串长度为：+alltrim(str(len)6、SPACE程序：clearinput 输入一个数字： to afor i=1 to a ? endfor补充部分题目1：变量值的交换，如交换a,b的值。程序：clearinput 一个数a： to ainput 一个数b： to bc=aa=bb=c?a,b交换后为+alltrim(str

22、(a)+,+alltrim(str(b)题目2：根据学生的成绩给予相应的等低，对应关系如下： 以下程序：clearinput 输入一个学生的成绩： to cjdo case case cj90 ?Acase cj80?Bcase cj60?Cotherwise?Dendcase题目3：位数对调,输入一个三位自然数，把这个数的百位与个位数对调，输出对调后的数。程序：clearinput 一个三位数a： to ab1=int(a/100)b2=mod(int(a/10),10)b3=mod(a,10)b=b3*100+b2*10+b1?alltrim(str(a)+位数对调后为：+alltrim(

23、str(b)类似题型：计算一个三位数个十百位数字的和。程序：input 输入一个三位数：to xs=0for i=1 to 3 a=val(substr(str(x,3),i,1) s=s+a endfor ?这个三位数的各位之和是:+alltrim(str(s,2) 题目4：求出1-100中所有的素数，并将每个素数按照一排五个输出？程序：cleary=0&此变量用来判断输出的素数是第几个，逢五换行for i=2 to 100f=0&此变量用来判断该数是否为素数 for j=2 to int(sqrt(i) if mod(i,j)=0 f=1 endif endforif f=0 ?alltrim(str(i)+ &双问号表示在同一行输出，不换行 y=y+1if mod(y,5)=0 ?endifendifendfor题目5：寻找水仙花数数，求所有这样的三位数，这些三位数等于它各位数字的立方和。例如，15313 53 33。程序：clear&此方法为穷举法，即将所有可能全部列出。for i=1 to 9for j=0 to 9for k=0 to 9a=100*i+10*j+kif a=i3+j3+k3?alltrim(str(a)endifendforendforendfor