《Visual FoxPro程序设计》课件第2章Visual FoxPro6.0编程基础

本章主要内容2.1常量2.2变量2.3表达式2.4系统函数2.1常量

一、常量常量类型：字符型、数值型、货币型、逻辑型、日期型、日期时间型1、数值型：构成：由0-9数字，-、+号，小数点例：32，-6，5.8表示形式：基本表示法科学计数法2、货币型：构成：$、数字、小数点

例：输入$125.547878

注：1）输出时没有“$”符号

2）输出时小数点后自动保留4位。125.5479练习输入输出$34.75263$456.45$1.77788834.7536456.45001.7779※3、字符型(由定界符引起的一组字符串)定界符：‘’，“”，[]

例：“中国”，[上海]，‘apple’

注：1）定界符要成对出现；

2）输出时没有定界符；

3）如果定界符做为字符串中的一部分，必须使用其他定界符；练习输入输出“VisualFoxPro”[“中国北京”]‘12345’VisualFoxPro“中国北京”123454、日期型：输入格式：{^yyyy-mm-dd}

例：{^2006-08-28}1）日期型常量的定界符：{}2）以脱字符^开头

3）年份占4位，月、日各占2位

输入时应注意1）输出时的格式：mm/dd/yy2）关于连接符默认为：／

3）输出时无定界符

练习输出时应注意输入输出｛＾2008-10-21｝03/27/0610/21/08{^2006-03-27}影响日期格式的设置命令1）设置分隔符命令：Setmarkto[日期分隔符]例1：？{^2006-08-28}例2：Setmarkto“-”

？{^2006-08-28}

输出08-28-0608/28/06练习1、Setmarkto“.”

？{^1996-05-19}

输出05.19.962、Setmarkto“”

？{^2002-03-05}

输出0305022）设置日期显示格式命令：Setdateto……例1：SetdatetoYMD

？{^2006-08-28}

输出06-08-283）设置年份显示位数命令：Setcenturyon/off例1：Setcenturyon

？{^2006-08-28}

输出08/28/2006练习1、Setmarkto“.”setdatetoYMDsetcenturyon

？{^2004-12-25}输出结果：2004.12.255、日期时间型：格式：{<日期>,<时间>}{^YYYY-MM-DD,[hh[:mm[:ss]][a|p]]}例：输入：{^2006-08-27,10:15a}

输出结果：08/27/0610:15:00AM注：1）hh,mm,ss,a|p的默认值分别为：

12，00，00，AM2）输入时逗号不可省，输出时省略6、逻辑型（用来表示真或假的常量）真：.T.、.t.、.Y.、.y.

假：.F.、.f.、.N.、.n.注：逻辑型常量输出时就有两个值：真：.T.

假：.F.1、变量字段变量简单的内存变量内存变量数组区别：简单内存变量不用定义直接使用，数组必须先定义再使用。变量2.2变量简单内存变量内存变量的赋值：格式1：Store<表达式>to<变量名>格式2：<内存变量名>=<表达式>例：把2赋给变量X和变量Y方法1：Store2tox,y方法2：x=2y=2１）store…to…一次可以为多个变量赋值２）＝一次只能给一个变量赋值区别数组：是内存中连续的一片存储区域，它由一系列元素组成。例：a(1),a(2),a(3),a(4)定义数组：格式1：dimension<数组名>(数组下标)

例：dimensiona(4)，dimensionb(2,3)格式2：declare<数组名>(数组下标)

例：declarea(4),declareb(2,3)b(1,1),b(1,2),b(1,3)b(2,1),b(2,2),b(2,3)数组的特点：１）一个数组中各元素的数据类型可以不相同２）数组下限规定为１３）数组创建后，系统自动给每个数组元素赋以逻辑假.F.４）给数组名赋值则给数组中的每个元素赋值５）可用一维数组表示二维数组．例：dimensionb(2,3)第1行① ② ③

b(1,1),b(1,2),b(1,3)第2行④ ⑤ ⑥

b(2,1),b(2,2),b(2,3)b(1)b(1,1)

b(2)b(1,2)b(5)b(2,2)例：dimensiona(4)a(1)=123a(2)=$123.45a(3)=“abcd”a(4)=.T.例：dimensiona(4)a(1)=123a(3)=“abcd”?a(1),a(2),a(3),a(4)结果：123.F.abcd.F.练习执行如下命令序列后,最后一条命令的显示结果是（）

DIMENSIONM(2,2)

M(1,1)=10

M(1,2)=20

M(2,1)=30

M(2,2)=40

?M(2)

A)变量未定义的提示B)10C)20D).F第1行① ②

M(1,1),M(1,2)第2行③ ④

M(2,1),M(2,2)

练习例:dimensionx(2,3)x(1,2)=6x(1,3)=7x(2,1)=8x(2,2)=9x(2,3)=10求:x(1)=________,x(5)=_________2.3表达式定义：由常量、变量和函数通过特定的运算符连接起来的式子数值表达式字符表达式日期时间表达式关系表达式逻辑表达式1、数值表达式算术运算符：（1）（）（2）**或^（乘方）（3）*、/、%（求余）（4）+、—优先级逐级递减注例（35+6）-8*6**2例：17%5=22、字符表达式运算符:+：前后两个字符串首尾连接.-：连接前后两个字符串，并将前字符串的尾部空格移到合并后的新字符串尾部.字符运算符优先级相同注练习输入输出“ABC”+“DEF”“ABC”+“DEF”“ABC”-“DEF”“ABCDEF”“ABCDEF”“ABCDEF”３、日期时间表达式运算符：+，-例1：{^2005-08-13}+5例2：{^2005-08-13}-10例3：{^2005-08-13}-{^2005-07-13}08/18/0508/03/0531格式结果1、<日期>+<天数>日期型2、<天数>+<日期>日期型3、<日期>-<天数>日期型4、<日期>-<日期>数值型5、<日期时间>+<秒数>日期时间型6、<秒数>+<日期时间>日期时间型7、<日期时间>-<秒数>日期时间型8、<日期时间>-<日期时间>数值型注：无<日期>+<日期>和<日期时间>+<日期时间>日期时间表达式的格式4、关系表达式格式：<表达式1><关系运算符><表达式2>运算结果：逻辑型关系运算符：（1）<(2)<=(3)>(4)>=(5)=(6)==

(7)<>、#或！=(8)$（子串包含测试）注：所有关系运算符的优先级一样$（子串包含测试）：格式：<字符表达式>$<字符表达式>功能：用来测试前者是否为后者的子串。例：表达式结果“计算”$“计算机”“abc”$“abc”

“男”$“男同学”“abcd”$“ab”.T..F..F..T.字符串精确比较与EXECT设置==:只有两个字符串完全相等时值为真.

setexacton:先在较短的字符串的尾部加上若干个空格，使两个字符串长度相等，然后对应字符一一比较

setexactoff（默认）:右边字符串与左边的字符串前部分内容相匹配时,值就为真.=:练习输入输出“abc”==“abcd”“ABC”=“AB”“ABC”=“AB”.F..T..F.Setexacton5、逻辑表达式运算符：非：.NOT.（取反）与：.AND.（两边同时为真才为真）或：.OR.（两边有一个为真就为真）注：1)逻辑运算符两边都是逻辑表达式

2)优先级顺序为.NOT.>.AND.>.OR.例1：.NOT.(.F.)例2:(.T.).AND.(.F.).T..F.XYX.AND.YX.OR.YNOT(X).T..T..T..F..F..T..F..F..T..F..F..T..T..T..T..T..F..F..F..F.6、各种运算符的优先级算术运算符：（）>**或^>*、/、%>+、-关系运算符:所有关系运算符的优先级一样逻辑运算符:.NOT.>.AND.>.OR.注：算术运算符>关系运算符>逻辑运算符例：3+3>7.OR.4-2<3.AND.3+3=5

结果：.F.练习1、计算表达式：1－8>7.OR.‘a’+‘b’$‘123abc123’

结果.T.练习？8>3.AND.“女”>“女生”.OR..T.<.F.

结果.T.2.4系统函数一、数值函数1、ABS（〈数值表达式〉）功能：求绝对值返回值：数值表达式的绝对值例：ABS（-10）结果102、SIGN（〈数值表达式〉）功能：求符号返回值：1正号

-1负号

0零例：SIGN（25）结果13、SQRT（〈数值表达式〉）功能：求平方根返回值：数值表达式的平方根例：SQRT（25）结果54、PI（）功能：求圆周率返值：圆周率例：X=PI（）结果X=3.14159265、INT（〈数值表达式〉）功能：取整返回值：数值表达式的整数部分例：INT（13.5）结果136、CEILING（〈数值表达式〉）功能：求最小整数返回值：大于或等于数值表达式的最小整数例：CEILING（13.5）结果147、FLOOR（〈数值表达式〉）功能：求最大值返回值：小于或等于数值表达式的最大整数例：FLOOR（13.5）结果138、ROUND（〈数值表达式1〉,〈数值表达式2〉）功能：四舍五入注：1)数值表达式1……进行四舍五入的数据；

2)数值表达式2……指定小数位数

3)当表达式小于零时，表示对第几位整数进行四舍五入例：ROUND（123.456,2）结果123.46９、MOD(<数值表达式1>,<数值表达式2>)功能：求余数返回值：数值表达式1与数值表达式2相除后余数例：MOD（12，8）结果410、MAX（〈数值表达式1〉，〈数值表达式2〉[，〈数值表达式3〉……]）功能：求最大值返回值：几个数值表达式中的最大值例：MAX（23，12，2，32）结果3211、MIN（〈数值表达式1〉，〈数值表达式2〉[，〈数值表达式3〉……]）功能：求最小值返回值：数值表在式中的最小值例：MIN（23，12，2，32）结果2二、字符函数1、LEN（〈字符表达式〉）功能：求字符串的长度返回值：字符表达式所包含字符个数例：LEN（“HAPPY”）结果52、LOWER（〈字符表达式〉）功能：大写转换为小写返回值：将字符表达式的大写字母转换为小写字母例：LOWER（“ABC“）结果abc3、UPPER（〈字符表达式〉）功能：小写转换为大写返回值：将字符表达式的小写字母转换为大写字母例：UPPER（“new”）结果NEW4、SPACE（〈字符表达式〉）功能：生成空格字符串返回值：生成N个空格例：LEN（SPACE（10））结果105、TRIM（〈字符表达式〉）功能：删除尾部空格返回值：删除尾部空格后的字符串例：LEN(TRIM（“HELLO”）)

结果56、LTRIM（〈字符表达式〉）功能：删除前导空格返回值：删除前导空格后的字符串例：LEN(LTRIM（“HELLO”）)

结果57、ALLTRIM（〈字符表达式〉）功能：删除前、后空格返回值：删除前、后空格后的字符串例：ALLTRIM（“HELLOWORD”）结果HELLOWORD8、LEFT（〈字符表达式〉，〈长度N〉）功能：从左边开始求子串返回值：从字符表达式的左边开始取N个字符例：LEFT（“HELLOWORD”，4）结果HELL9、RIGHT（〈字符表达式〉，〈长度N〉）功能：从右边开始求子串返回值：从字符表达式的右边开始取N个字符例：RIGHT（“HELLOWORD”，4）结果WORD10、SUBSTR（〈字符表达式〉，〈起始位置〉，[，〈长度N〉]）功能：求子串返回值：从字符表达式的“起始位置“开始取N个字符。（注：若N缺省，则取到最后一个字符）例：SUBSTR（“HAPPYNEWYEAR”，5，3）结果YN11、AT（〈字符表达式1〉,〈字符表达式2〉[，〈数值表达式〉]）功能：求子串的位置返回值：若字符表达式1是字符表达式2的子串，返回字符表达式1首字符在字符表达式2的位置，否则返回0例：AT（“IS”，“THISISABOOK”）结果312、ATC（〈字符表达式1〉,〈字符表达式2〉[，〈数值表达式〉]）功能：与AT功能类似，但在子串比较时不区分字母大小写返回值：若“字符表达式1”是“字符表达式2”的子串，返回”字符表达式1”首字符在”字符表达式2”的位置，否则返回0例：ATC（“is”，“THISISABOOK”）结果313、STUFF(<字符表达式1>,<起始位置〉,<长度>,<字符表达式2>)功能：子串替换返回值：用字符表达式2替换字符表达式1

中<起始位置>开始的N个字符例：STUFF（“THIS”，3，2，“AT”）结果THA14、CHRTRAN（〈字符表达式1〉,〈字符表达式2〉，〈字符表达式3〉）功能：字符替换返回值：当第一个字符串中的一个或多个字符与第二个字符串中的某个字符相匹配时，就用第三个字符串的对应字符（相同位置）替换这些字符例：CHRTRAN（“ABACAD”，“ACD”，“X12”）结果XBX1X215、LIKE（〈字符表达式1〉,〈字符表达式2〉）功能：字符串匹配返回值：“字符表达式1”与“字符表达式2”对应位置的所有字符都匹配则返回逻辑真，否则返回逻辑假例：LIKE（“ABC”，“AB”）结果.F.三、日期和时间函数1、DATE（）功能：求系统日期返回值：系统当前日期注：返回值的为日期型数据2、TIME（）功能：求系统时间返回值：系统当前时间注：返回值的数据类型字符型3、DATETIME（）功能：求系统日期时间返回值：系统当前日期时间注：返回值的数据类型日期时间型4、YEAR（〈日期表达式〉|〈日期时间表达式〉）功能：求年份返回值：指定表达式的年份注：返回值的数据类型数值型5、MONTH（〈日期表达式〉|〈日期时间表达式〉）功能：求月份返回值：指定表达式的月份6、DAY（〈日期表达式〉|〈日期时间表达式〉）功能：求天数返回值：指定表达式的月中的天数注：返回值的数据类型数值型7、HOUR（〈日期时间表达式〉）功能：求小时返回值：指定表达式的小时部分注：返回值的数据类型数值型8、MINUTE（〈日期时间表达式〉）功能：求分钟返回值：指定表达式的分钟部分注：返回值的数据类型数值型9、SEC（〈日期时间表达式〉）功能：求秒返回值：指定表达式的秒数部分注：返回值的数据类型数值型四、数据类型转换函数1.STR(<数值表达式>,[,<长度>[,<小数位数>]])功能：数值转换成字符串注：理想长度L=整数位数+小数位数+小数点1）当<长度>大于L：字符串前加上空格，满足规定的<长度>要求2）当<长度>大于等于整数部分位数但又小于L：优先考虑整数部分而自动调整小数位数3）当<长度>小于整数部分位数：返回一串星号（*）4）当<小数位数>的默认真为0时，<长度>的默认值为10例：X=-123.456?STR(X，9，2)

？STR(X，6，2)

？STR(X，3)

？STR（X，6）？STR（X）

-123.46***-123.5-123-1232、VAL（〈字符表达式〉）功能：字符串转换成数值返回值：将数字组成的字符表达式转换成数值例：VAL（“123.56”）结果123.56VAL（“12A34”）结果12VAL（“A123”）结果0注：1、若字符串内出现非数字字符，则只转换前部分2、若字符串的首字符不是数字符号，则返回03、CTOD（〈字符表达式〉）功能：将字符表达式转换成日期型数据4、CTOT（〈字符表达式〉）功能：将字符表达式转换成日期时间型数据5、DTOC（〈日期表达式〉|〈日期时间表达式〉[，1]）功能：将日期或日期时间型数据转换成字符串注：选项1规定字符串格式为YYYYMMDD6、TTOC（〈日期时间表达式〉[，1]）功能：日期时间转换成字符串7、&<字符型变量>[.]功能：替换出字符型变量的内容联（注：&的值是变量中的字符串）五、测试函数1、BETWEEN（〈表达式T〉,〈表达式L〉,〈表达式H〉）功能：值域测试函数返回值：若L<T<H则返回.T.否则返回.F.

若L或H值为NULL返回值为NULL例：BETWEEN（40，34，50）结果.F.注：三个表达式的数据类型要一致2、ISNULL（〈