1、第 1 页共 14 页第 3 章 Visual FoxPro 的常量、变量、表达式和函数3 1 Visual FoxPro 的常量一、常量的认识1、常量是表示一个确定的数据，如 65.8 等。2、Visual FoxPro 中，常量的类型有数值型、货币型、字符型、逻辑型、日期型、日期时间型 6 种。二、数值型常量1、数值型常量表示的是一个具体的数，因此，数值型常量也称为常数。2、数值型常量的表示日常表示法如 12、+56、-64.8 等。科学表示法1.6E12 表示 1.61012；1.6E-12 表示 1.610-12；-1.6E12 表示-1.610 12；-1.6E-12 表示-1.61
2、0 -12。三、货币型常量1、货币型常量用来表示一个具体的货币值。货币型常量的小数位数最多 4 位。2、货币型常量的表示如$12，$12.68，-$12.68 等。四、字符型常量1、字符型常量用来表示一串字符（数字、符号、汉字统称为字符） ，因此，字符型常量也称为字符串。2、字符型常量的表示如abcd、“abcd“、abcd 均表示字符串 abcd。3、说明表示字符型常量前后的、“或 称为字符型常量的定界符 ，它表示字符串的开始和结束，不是字符串的组成内容。字符串的前后定界符必须一致，如abcd“等是错误的。当字符串中包含定界符时，必须使用与之不同的定界符作为字符串的定界符，如字符串abcd
3、应表示为“abcd“或abcd。字符型常量中的字母大小写是区分的，比如“abcd“和“ABCD“是不同的两个字符串。注意：其他场合，字母的大小写是不区分的。组成字符串的内容中可以有空格，如“ab cd“、“a bc d“、“ “等都是正确的字符串。定界符中没有任何内容时，也是正确的字符串，这样的字符串称为空串。注意：空串并不是指全部由空格组成的字符串。第 2 页共 14 页五、逻辑型常量1、逻辑型常量用来表示一个逻辑值。逻辑值只有两个：真值和假值。2、逻辑型常量的表示真值：.T. 、.t. 、.Y. 、.y.假值：.F. 、.f. 、.N. 、.n.六、日期型常量1、日期型常量用来表示一个日期
4、。2、日期型常量的表示如 2010 年 12 月 9 日可表示为：2010-12-9、2010.12.9、2010/12/9、2010 12 9。说明：这种表示格式不受系统当前日期格式的影响。七、日期时间型常量1、日期时间型常量用来表示一个日期和时间。2、日期时间型常量的表示格式：日期，时间 其中，日期的书写格式与日期型常量中的日期格式相同，时间的书写格式有：8:30:30、18:15:25、8:10:30A 、8:10:30AM 、8:10:30P、8:10:30PM。练习通过显示命令显示你的姓名、所在专业、年龄、月消费金额、出生日期、是否党员（假设真值表示是党员、假值表示不是党员） 、我们
5、下次课的日期及时间。3 2 Visual FoxPro 的变量一、变量的认识1、变量是一个用名称（称为变量名）来表示的量，它的值是可改变的。2、变量名一般以字母或汉字开始，其后可以是字母、汉字、数字及某些符号（如下划线） 。思考a，aa ， b12，c_1，a1B2，2d4，同学们， “同学们” ，“ 同学们“以上哪些可以作为变量名？3、变量的类型由其值的类型决定。二、给变量赋值1、赋值命令的格式变量=表达式store 表达式 to 变量 1，变量 2，2、赋值命令举例例 1：下列赋值命令是否正确？正确的说出含义，错误的说出原因。Store 88 to a1，a2，a3Store 8+8 to
6、 b1，b2，b3Store 8，9，10 to c1，c2，c3第 3 页共 14 页d1=d2=d3=55p=10p=”生物工程和环境科学”例 2：为变量 a 赋一个值 12，为变量 x、y、z 赋值 34.2，并验证。三、数组变量的另一种使用形式1、数组的认识 1普通变量（简称变量）的情况是：一个变量里只能“放”一个值。数组变量（简称数组）的情况是：一个变量里可以“放”多个值。2、数组的认识 2数组中，之所以能“放”多个值，是因为它有多个元素。如，假设 a 是一个数组，其有两个元素，则两个元素分别表示为 a（1） 、a（2） 。假设 b 是一个有两行两列 4 个元素的数组，则 4 个元素
7、分别表示为 b（1，1） 、b（1，2） 、b（2，1） 、b（2，2） 。3、数组的认识 3如果一个数组，其元素不分“行” 、 “列” ，则该数组称为一维数组；如果一个数组，其元素按“行” 、 “列”排列，则该数组称为二维数组。4、数组的使用数组必须先定义，然后才能使用。说明：普通变量在第一次赋值时被自动定义，即无需预先定义。5、数组的定义一维数组的定义：dimension|declare 数组名（下标上限）二维数组的定义：dimension|declare 数组名（第一个下标上限，第二个下标上限）说明：下标上限指下标的最大值。下标下限指下标的最小取值。VFP 中，下标的下限规定为1。一个命
8、令可同时定义多个数组，之间用逗号分隔。例：定义一维数组 A，有 4 个元素；定义二维数组 B，有 3 行 4 列元素。6、有关说明数组定义后，如果未对其赋值，则各元素为假值；给数组赋一个值时，其元素均得到该值，但通常都是为其元素分别赋值（因为各元素值往往不同） ；数组不直接参加运算，参加运算的是它的元素；二维数组元素也可以只用一个下标来表示。四、变量的有关命令1、list memory 命令格式：LIST MEMORY LIKE 通配名 TO PRINTER TO FILE 文件名。功能：显示变量信息。说明：变量信息包括变量名、类型、值等内容。命令格式中，中括号项表示中括号里的内容不是必须有的
9、，看实际情况。这样的项称为第 4 页共 14 页选项。思考使用选项时，中括号要否？“LIKE 通配名”选项解释表示只显示和通配名一致的变量信息。没有该选项时，表示显示全部的变量信息。说明：通配名是指包含？或*的变量名，其中，？表示该位置可以是任意的某个符号，*表示该位置可以是任意多的符号。比如 a?c 表示这样的一些变量：第一位是 a，第二为任意，第三位是 c；a*c 表示这样的一些变量：第一位是 a，最后一位是 c，中间内容任意。“TO PRINTER”选项解释表示将变量信息同时送打印机打印。“TO FILE 文件名”选项解释表示将变量信息同时存入到指定的文件中。显示全部变量信息时，不仅有我
10、们自己使用的变量，而且包括 VFP 本身所固有的变量（这些变量称为系统变量，系统变量名均以下划线开始） 。当显示的变量信息超出一个屏幕时，前面的信息会滚出屏幕。2、display memory 命令格式：DISPLAY MEMORY LIKE 通配名 TO PRINTER TO FILE 文件名 。功能：显示变量信息。说明：与 list memory 命令的唯一区别在于：当显示的变量信息超出一个屏幕时，该命令能做到一个屏幕一个屏幕地显示。3、clear memory 命令格式：clear memory功能：清除所有变量。说明：系统变量是我们清除不掉的。4、release 命令格式 1：rele
11、ase 变量 1，变量 2，功能：清除指定的变量。格式 2：release all功能：清除所有变量。格式 3：release all like 通配名功能：清除和通配名一致的变量。格式 4：release all except 通配名功能：清除和通配名不一致的变量。练习一、试用二维数组表示如下矩阵并予以显示：1 0 0 00 1 0 00 0 1 00 0 0 1二、用一个下标方式表示上题对角线上各元素，并通过显示命令显示出他们的值。三、分别为变量 abc，xb，mbn 赋值2012-12-15，.f.，25，然后显示：1、这三个变量的值；2、这三个变量的信息。四、VFP 中，能否使用三维数
12、组？第 5 页共 14 页五、练习其他有关内容。3 3 Visual FoxPro 的函数一、认识可以通过 VFP 提供的函数对数据进行运算。通过函数对数据进行运算时，参加运算的叫自变量或参数，运算结果就是函数值。函数的一般使用格式：函数名（自变量，自变量，）注意：VFP 中，当一个函数不需要自变量时，圆括号也要写上，如 DATE（）等。二、常用数值函数1、ABS 函数功能：求一个数的绝对值。例 1：ABS(67)例 2：ABS(-67+89)例 3：ABS(-82)思考：如何验证函数值？2、SIGN 函数功能：当自变量值正时，返回 1；当自变量值负时，返回-1；当自变量值为 0 时，返回 0
13、。例：SIGN(56-73)思考：试用 SIGN 函数写出为变量 B 赋值的赋值命令，要求：当变量 A 的值为正时，B 赋以值 8+20；当变量 A 的值为负时，B 赋以值 8-20；当变量 A 的值为 0 时，B 赋以值 8。3、SQRT 函数功能：求正数的平方根。例：SQRT(2)说明：默认计算结果为 2 位小数。SET DECIMALS TO 命令可设置运算结果的小数位数。4、PI 函数功能：函数值为圆周率的值。例：PI()5、INT 函数功能：返回自变量的整数部分。例 1：INT(1.3)例 2：INT(1.6)例 3：INT(-1.3)例 4：INT(-1.6)6、CEILING 函
14、数功能：返回大于或等于自变量的最小整数。俗称天花板函数。例 1：CEILING(1.3)例 2：CEILING(2)例 3：CEILING(-1.3)例 4：CEILING(-2)7、FLOOR 函数功能：返回小于或等于自变量的最大整数。俗称地板函数。例 1：FLOOR(1.3)第 6 页共 14 页例 2：FLOOR(2)例 3：FLOOR(-1.3)例 4：FLOOR(-2)8、ROUND 函数功能：对自变量的值进行四舍五入运算。运算时，第二个自变量表示精确到哪一位。例 1：ROUND(345.345,2)例 2：ROUND(345.345,1)例 3：ROUND(345.345,0)例
15、4：ROUND(345.345,-1)9、MOD 函数功能：求两个整数相除以后的余数。例 1：MOD(10,3)例 2：MOD(9,3)例 3：MOD(11,3)说明：有负数的求余不考虑。10、MAX 函数功能：从多个自变量中挑出最大的值。例：MAX(1,2,7,4,5) 说明：自变量也可以是非数值型的，但自变量的类型应一致。如：MAX(“A”,”ABC”,”BC”)11、MIN 函数功能：从多个自变量中挑出最小的值。例：MIN (1,2,7,4,5) 说明：自变量也可以是非数值型的，但自变量的类型应一致。如：MIN (“A”,”ABC”,”BC”)三、常用字符处理函数1、LEN 函数功能：求
16、字符串的长度。说明：一个汉字长度为 2，一个英文字符（包括空格）长度为 1。例：LEN(“Visual FoxPro 教程 “)2、LOWER 函数功能：将自变量中的所有字母转化为小写字母。例：LOWER(“Visual FoxPro 教程“)3、UPPER 函数功能：将自变量中的所有字母转化为大写字母。例：UPPER(“Visual FoxPro 教程“)4、TRIM 或 RTRIM 函数功能：将字符型自变量右边空格去掉。例：TRIM(“ Visual FoxPro “)5、LTRIM 函数功能：将字符型自变量左边空格去掉。例：LTRIM(“ Visual FoxPro “)6、ALLTRI
17、M 函数第 7 页共 14 页功能：将字符型自变量左、右两边的空格均去掉。例：ALLTRIM(“ Visual FoxPro “)7、LEFT 函数功能：从一个字符串左边开始取子串。例 1：LEFT(“下午好！“,2)例 2：LEFT(“下午好！“,4)8、RIGHT 函数功能：从一个字符串右边取子串。例 1：RIGHT(“下午好！“,2)例 2：RIGHT(“下午好！“,4)9、SUBSTR 函数功能：从一个字符串中取子串。例 1：SUBSTR(“下午好！“,3,4)例 2：SUBSTR(“下午好！“,3)10、SPACE 函数功能：产生指定个数空格组成的字符串。例：SPACE(10)11、
18、REPLICATE 函数功能：由指定字符串重复组合产生字符串。例 1：REPLICATE(*,10)例 2：REPLICATE(ABCD,5)12、AT 函数功能：求第一个字符串在第二个字符串中出现的位置。例 1：AT(“ab“,“huABygabhgtabagf“)例 2：AT(“ab“,“ huABygabhgtabagf “,2)13、ATC 函数功能：求第一个字符串在第二个字符串中出现的位置，但不区分字母大小写。例 1：ATC(“ab“,“ huABygabhgtabagf “)例 2：ATC(“ab“,“ huABygabhgtabagf “,2)14、OCCURS 函数功能：求第一
19、个字符串在第二个字符串中出现的次数。例 1：OCCURS(“a“,“abScaBdA“)例 2：OCCURS(“ab“,“abScaBdA“)例 3：OCCURS(“abc“,“abScaBdA“)15、STUFF 函数功能：字符串内容替换。例：STUFF(“gtyabku“,3,4,“AA“)思考：在“ab“的 a、 b 之间插入“和“。“淮北煤炭师范学院”已改名为“淮北师范大学”了，淮北师范大学的你，能通过STUFF 函数，将“淮北煤炭师范学院”中的“煤炭”二字删除、 “学院”二字改为“大学” ，使得结果是“淮北师范大学”吗？16、CHRTRAN 函数功能：字符串内容替换。第 8 页共 1
20、4 页例 1：CHRTRAN(“aBCAAC“,“AC“,”12”)例 2：CHRTRAN(“aBCAAC“,“AC“,”1”)例 3：CHRTRAN(“aBCAAC“,“AC“,”123”)说明：该函数对汉字进行替换时，会出现异常。例 4：CHRTRAN(“大家好！“,“ 大家“,“你“)例 5：CHRTRAN(“淮北煤炭师范学院“,“ 学院煤炭“,“大学“)17、LIKE 函数功能：如果两个字符串一样，则函数值为真值，否则是假值。例 1：LIKE(“abc“,“ABC“)例 2：LIKE(“abc“,“ab“)例 3：LIKE(“abc“,“abc“)说明：前一个字符串中可以出现通配符?和
21、*。？表示该位置可以是任意的某个符号，*表示该位置可以是任意多的符号。例 4：LIKE(“ab*“,“ab“)例 5：LIKE(“ab“,“ab*“)四、常用日期、时间函数1、DATE 函数功能：返回当前系统日期。例：DATE()2、TIME 函数功能：返回当前系统时间。例：TIME()说明：函数值为字符型。3、DATETIME 函数功能：返回当前系统日期及时间。例：DATETIME()思考：函数值什么类型？4、YEAR 函数、MONTH 函数、DAY 函数功能：分别返回日期或日期时间型自变量中的年份、月份和日子。例：分别求出今天的年、月、日。5、HOUR 函数、MINUTE 函数、SEC 函
22、数功能：分别返回日期时间型自变量中的时、分、秒。例：分别求出现在的时、分、秒。五、常用转换函数1、STR 函数功能：将数值型自变量转换为字符型。例：STR (123.456)说明：函数值默认 10 位，不带小数部分。可以加上第 2、第 3 个参数，用来分别表示总位数和小数位数。默认或指定位数比实际位数多时，函数值的左边补以相应个数的空格，以保证总位数；默认或指定位数比实际位数少时，先减少小数位数，还不够时，只好返回默认或指定位数个*。练习：验证以下函数值，看看和自己预想的是否一致。第 9 页共 14 页STR (123.456,5)STR (123.456,5,1)STR (123.456,5
23、,2)STR (123.456,6,2)STR (123.456,3,2)STR (123.456,2)2、VAL 函数功能：将字符型自变量转换为数值型。例 1：VAL(“1234.56“)例 2：VAL(“123a“)例 3：VAL(“上午好！“)3、DTOC 函数功能：将日期型或日期时间型自变量转换为相应的日期字符串。例：DTOC(DATE()说明：转换后的字符串组成和当前日期格式有关，若加上 1 参数，将转化为 YYYYMMDD这种固定格式的字符串，如：DTOC(DATE(),1)4、TTOC 函数功能：将日期时间型自变量转换为相应的字符串。例：TTOC(DATETIME()说明：转换后
24、的字符串组成和当前日期时间格式有关，若加上 1 参数，将转化为YYYYMMDDHHMMSS 这种固定格式的字符串，如：TTOC(DATETIME(),1)5、CTOD 函数功能：将日期形式的字符串转化为日期型。说明：字符串的日期形式应和当前日期格式一致，否则将转化为空日期。例：CTOD (“2010/5/1“)6、CTOT 函数功能：将日期时间形式的字符串转化为日期时间型。说明：字符串的日期时间形式应和当前日期时间格式一致，否则将转化为空日期时间。例：CTOT (“2010/5/1 10:8:30“)7、ASC 函数功能：求字符型自变量中第一个字符的 ASCII 码。例：ASC(A)8、CHR
25、 函数功能：根据 ASCII 码求对应的字符。例：CHR(65)六、常用测试函数1、EMPTY 函数功能：判断一个数据是否空值，是为真，否则为假。例：EMPTY (0) ，EMPTY (“0“)，EMPTY (“)，EMPTY (“ “)，EMPTY ()2、VARTYPE 函数功能：判断自变量的数据类型，返回相应的字母。例：VARTYPE(23)，VARTYPE(23)3、BETWEEN 函数第 10 页共 14 页功能：判断第一个自变量的值是否在后两个自变量之间，是，函数值为真值；不是，函数值为假值。例：BETWEEN(3,1,6)，BETWEEN(3,6,1)，BETWEEN(3,3,6
26、)，BETWEEN(3,4,6)，BETWEEN(“e”,”a”,”x”)七、其它常用函数1、条件函数用法：IIF（逻辑型表达式，表达式 1，表达式 2）功能：如果逻辑型表达式的值为真，则表达式 1 的值作为函数值，否则，表达式 2 的值作为函数值。例：函数 IIF(X10,AAA,BBB)思考：当变量 X 分别取值 10、0、100 时，函数 IIF(X10,AAA,IIF(X10,BBB,CCC)的值。2、宏替换函数用法：&字符型变量.功能：用字符型变量的值（不带定界符）替换整个宏替换函数。例：假设 A=76+28，问 A 和&A.分别等价于什么？说明：1）该函数是一个十分有用又十分特殊的
27、函数。2）宏替换函数出现在字符串中时也还有效，而其它函数出现在字符串中时被当作一个个字符处理。如：若 A=ABC，则X&A.Y 等价于XABCY；而XABS(-86)Y却不等价于X86Y。3）宏替换函数最后的小数点是宏替换函数的结束标记。当宏替换函数和其后的内容能够明确区分清楚时，该结束标记可以省略。思考：下面的表达式中，哪些宏替换函数的结束标记可以省略？&A.+52 ，&A.6-285 ， &A.BCDEFG。练习一、STR 函数将数值型自变量转换为字符型时，函数值默认 10 位，试予以验证。二、试通过 VARTYPE 函数了解下列函数值的类型：LEN 函数、AT 函数、OCCURS 函数、DATE 函数、TIME 函数、DATETIME 函数、STR函数、VAL 函数、 DTOC 函数、TTOC 函数、CTOD 函数、CTOT 函数、EMPTY 函数、BETWEEN 函数、VARTYPE 函数。三、试用 IIF 函数写出为变量 B 赋值的赋值命令，要求：当变量 A 的值为正时，B 赋以值8+20；当变量 A 的值为负时，B 赋以值 8-20；当变量 A 的值为 0 时，B 赋以值 8。四、先在命令窗口进行如下赋值：A=CLEB=XC=&B+YX=10Y=20然后在命令窗口输入下列各行并回车，看看现象或结果和自己预想的是否一致：?A,&A?B,&B
