VF第五章
数据库基础—Visual FoxPro 教案
第5章-VFP基础
第五章Visual FoxPro基础 数据类型 数据存储 表达式 函数
§1 数据类型 字符型 字符型数据（Character）：由汉字和ASCII字符集中可打印字符（英文字母、数字、各种符号）组成，数据长度0-254个字符。
数值型 1、数值型数据（Numeric）：数字、小数点、正负号组成，数据长度20位。 2、浮点型数据（Float）：同数值型，存储采用浮点格式，提高数字的精确度。 3、双精度型数据（Double）：同浮点型，采用固定长度浮点格式。 4、整型数据（Integer）：不包含小数点部分的数值型数据。整型数据以二进制形式存储。
日期型数据（Date）：日期数据，固定长度为8位。默认格式{^yyyy/mm/dd} (年/月/日) 日期时间型（DateTime）：描述日期时间数据，固定长度为8位。默认格式{^yyyy-mm-dd hh:mm:ss} (月/日/年小时:分:秒) 逻辑型数据（Logical）：逻辑判断值真(T)与假(F)，固定长度为1位
§2 常量、变量 常量：在所有操作中其值不变的数据项。 1.数值型常量（N）：由数字(0-9)、小数点和正负号组成。 最多20位，小数点算一位 例：3.14159
2.字符型常量(C)：由汉字及ASCII代码中可打印符号组成，必须使用定界符，定界符可为：半角的单引号、双引号、方括号 例：[123]，”123”, ‘123’ 4.逻辑型常量(L)：由表示逻辑判断结果为“真”或“假”的符号组成。 表示真：.t. , .T., .Y. , .y. 表示假：.f. , .F. , .N., .n.
《VFP》 第五章习题
第五章 一、填空 1、以下程序的功能是将英文字母组成的字符串加密.加密的算法是: 如果是大写字母,用原字母后面的第4个字母代替原字母, 否则用原字母后的第2个字母代替原字母,如原文"China",加密后的密文是"Gjkpc", 完善下列程序: m=space(0) c="China" for i=1 to 【 len(c)】 nc=asc(substr(c,I,1)) if nc>64 【 and】 nc<91 &&该字母的ASC值在64之91之间,表明该字母是大写 m=m+【chr(nc+4)/ chr(4+nc)】 else m=m+chr(nc+2) endif endf 2、完善下列程序,其功能是显示如下所示的文字图形. 金 字字 大大大 宝宝宝宝 塔塔塔塔塔 【程序清单】 CLEAR c="金字大宝塔" n=LEN(c)/2 FOR i=1 TO n ?SPACE(70-i) FOR j=1 【TO i】 ?? SUBS(C,2*i-1,2) =INKEY(0.5) ENDFOR ENDFOR 3、请写出x的值【 30】,y值是【 -2】 X=26 y=0 if int(x/2)=x/2 y=mod(x,3) x=x+4 endif if int(x/3)=x/3 y=Mod(x,-4) endif ? x,y
4、如果当前日期是2000年4月1日,并且命令 ?date()在屏幕上返回 04/01/00, 则命令行 ?date()+10在屏幕上返回的值为【 04/11/00】 5、已知N="1",M="2",X12="GOOD",则表达式X&N&M的值为【 GOOD】 6、已知有三个文件分别程序文件、查询文件、表单文件,文件名都是a, 请问运行程序文件的命令是【 do a】、 运行查询文件的命令是【do a.qpr】、 运行表单文件的命令是【 do form a】 7、执行下列程序后，输出到屏幕的结果为【 3】。 【程序清单】 CLEAR cstring="VisualFoxPro" nresult=0 m=LEN(cstring) FOR n=1 to m c=SUBSTR(cstring,n,1) IF !BETWEEN(ASC(c)，ASC("A"),ASC("Z")) LOOP ENDIF nresult=nresult+l ENDFOR ?nresult 8、完善下列自定义函数STR_RV(),其功能是将一个字符串(假设所有字符均为ASCII和 GB2312字符集中的字符)进行"反序".例如,STR_RV("ABCD")的返回值为"DCBA". 【程序清单】 FUNCTION str_rv() PARAMETERS c P=SPACE(O) DO WHILE LEN(C)>0 x=ASC(【LEFT(c,1)/SUBSTR(c,1,1)/ SUBS(c,1,1)】) IF x>127 &&ASCII码值大于127的字符为汉字(x为半个汉字的机内码) i=2 ELSE i=1 ENDIF P=LEFT(C,i)+P C=SUBSTR(c,i+1) ENDDO 【 RETURN P/ RETU P】 ENDFUNC 9、在Visual FoxPro中,基类的事件集合是固定的,不能进行扩充.基类的最小事件集包括 Init 事件、Destroy 事件和【error 】事件 10、如果2002年3月18号是星期一,则以下命令在屏幕上显示【 2】 x={^2002/03/18} ?dow(x)