1、Visual FoxPro 程序设计（第二版）,第3章 数据与数据运算,3.1 数据类型、常量和变量,在Visual FoxPro中所有的数据都具有类型，数据类型决定数据的存储方式和使用方式，即数据的取值范围和可以进行的操作。Visual FoxPro6.0的数据类型分为两大类，一种适用于变量和数组，另一种适用于数据表中的字段。Visual FoxPro定义了13种字段类型和7种数据类型。 字段类型是：字符型、数值型、浮动型、双精度型、整型、货币型、日期型、日期时间型、逻辑型、备注型、通用型、二进制字符型和二进制备注型。 数据类型是：字符型、数值型、货币型、日期型、日期时间型、逻辑型和通用型。
2、,3.1.1 数据类型,3.1.2 常量,常量：在程序的运行过程中不改变其值的量 常量的种类： 数值型常量 字符型常量 逻辑型常量 日期型常量 货币型常量,1.数值型常量,用整数、小数、科学计数法表示的数 举例：85，-56.2, 1.256E3, 3.8E-2 等,2. 字符型常量,由一串字符组成的字符串，用“”（双引号）、 （单引号）、 （方括号）括起来。 举例： 副教授、”boy”、 数据库系统是合法常量，而”I am a boy”、Its abest是非法常量。 注意：最长只能为254个字符,3.逻辑型常量,表示“真”或“假”的量 表示方法： “真”.T.、.Y.、.t.、.y. “假
3、”.F.、.N.、.f.、.n. 注意：两边的点不能少,4.货币型常量,表示货币值的量 表示：以$开头，4舍5入到小数点4位 举例：$123.456789结果为123.4568,5.日期型常量,日期时间常量也必须用花括号括起来, 格式为： YYYY-MM-DDhh:mm:ss a|p 例如：2005/05/19 10:04am、2005-05-21 11:32:14pm。 但必须注意日期和时间之间必须有空格。,6.日期时间型常量,在Visual FoxPro6.0中日期型常量用花括号“ ”作为定界符括起来，格式为： YYYY-MM-DD 例如：2005/05/18,或2005-05-18。,3
4、.1.3 变量,在命令操作和程序运行过程中其值允许变化的量称变量，在Visual FoxPro6.0中使用的变量分为字段变量、内存变量两种。每个变量都必须有一个变量名，变量名是由字母、汉字、数字和下划线组成，但必须以字母或汉字。,1字段变量,字段变量是数据表结构中的任意一个数据项。在一个数据表中，一个字段就是一个字段变量。字段变量在建立表结构时定义，修改表结构时可重新定义，或增删字段变量。字段变量的类型有13种。字段变量是一种多值变量，假设一个数据表中有10条记录，那么该数据表的每一字段就有10个取值，当用字段作变量时，它的当前值随着记录指针的移动而不断变化。,内存变量是表结构之外独立存在于内
5、存中的变量。内存变量可用来存储数据，定义内存变量时需为它取名并赋初值，内存变量建立后存储于内存中。Visual FoxPro6.0中共定义了6种类型的内存变量：数值型、字符型、日期型、日期时间型、逻辑型和货币型。可分为简单变量和数组变量。 (1) 内存变量赋值命令 格式1：内存变量= TO 功能: 计算表达式，然后将计算结果赋给内存变量。,2内存变量,(2) 表达式值显示命令 格式： ?/? 功能：，将表达式的值显示在屏幕上。 【说明】1.命令格式中的?/?可任选一个，它们的输出格式不同。? 表示从屏幕下一行的第一列起显示结果 ，? 表示从当前行的当前列起显示结果。例如:? Z & 在VFP主
6、窗口中显示VFP6.0? s1 & 换一行后显示28? “数据库应用” & 接着上一个命令显示结果28的后面显示“数据库应用”2.是表示用逗号隔开的多个表达式组，命令执行时遇逗号就空一格。例如:? “Z=”,Z & 显示Z= VFP6.0,3.系统内存变量,由VFP自动生成和维护的变量 一般以下划线开头 举例： _DIARYDATE &当前日期 _CLIPTEXT &剪贴板文本 例通过_calcvalue系统变量将一个数字传到计算器中，激活计算器窗口并计算结果。 clear _calcvalue=20 activate window calculator 例往剪贴板中写入信息 _CLIPTEX
7、T=“hello!“ 查看剪贴板,数组是具有相同名字、不同下标值的一组变量。数组中的每个数据值称为数组元素，每个数组元素在数组中的位置是固定的，可以通过称为下标的编号来进行访问。数组在使用时要由DIMENSION或DECLARE命令来定义。这两个命令完全相同，都是用于建立一维或二维数组。在Visual FoxPro 6.0中，同一个数组元素在不同时刻可以存储不同类型的数据，在同一数组中，每个数组元素可以被赋予不同数据类型的值。,4. 数组变量,数组的定义,格式：DIMENSION |DECLARE () ，() () ，() 例如：DIMENSION c(4)DIMENSION a(3) ,
8、b(2,3),数组的赋值,SZ(1)=”ABCD” & 给SZ(1)赋值，字符型，值：ABCD SZ(2)=23.45 & 给SZ(2)赋值，数值型，值：23.45 SZ(3)=2005/09/02 & 给SZ(3)赋值，日期型，值：2005年9月2日 SZ(4)=2005/11/02 9:00am & 给SZ(4)赋值，日期时间型，值：2005年11月2日上午9点 BZ(5)=T & 给SZ(5)赋值，逻辑型，值：真,3.2 Visual FoxPro6.0常见函数,函数的概念:Visual FoxPro6.0 0系统为用户提供了十分丰富的函数，灵活运用这些函数，不仅可以简化许多运算，而且能
9、够加强和完善Visual FoxPro的许多功能。 函数的一般格式： （）函数的三要素：函数名、参数、函数值 如：ABS(-2),3.2.1 数学运算函数,1平方根函数SQRT() 【格式】 SQRT(数值表达式) 【功能】 计算并返回数值表达式的算术平方根。 【例 1】 ? SQRT(5*5)5.00 2绝对值函数ABS() 【格式】 ABS() 【功能】 计算并返回数值表达式的绝对值。 【例 2】 ? ABS(-43.29)43.29,3四舍五入函数ROUND() 【格式】 ROUND(数值表达式，有效位数) 【功能】 对数值表达式的值按指定的有效位数进行四舍五入。 【例3】 ? R0UN
10、D(3.14159，4), ROUND(1234.9962,0), ROUND(1234.567,-1)3.1416 1235 1230 4取整函数INT() 【格式】 INT(数值表达式) 【功能】 计算并返回数值表达式的整数部分。 【例 4】 ? INT(-76.93)-76,5求模函数MOD() 【格式】 MOD(，) 【功能】 返回除以得到的余数值。 【说明】 在求摸运算中应注意以下几点： （1） 除数不能为0。 （2） 除数为正数，返回正数；如果为负数，返回负数。 （3） 如果被除数与除数能够整除，结果为0。 （4） 如果被除数与除数不能整除，且被除数与除数同号，则结果为被除数除以除
11、数而得到的余数。即：MOD(X1,X2)=X1-INT(X1/X2)*X2 。,（5） 如果被除数与除数不能整除，且被除数与除数异号，则结果为被除数除以除数而得到的余数再加上除数。即： MOD(X1,X2)=X1-INT(X1/X2)*X2+X2 。【例 5】 ? MOD(10,3) &结果为：1? MOD(-10,-3) &结果为：-1? MOD(-10,3) &结果为：2? MOD(10,-3) &结果为：-2,3.2.2 字符处理函数,1取子串函数SUBSTR() 【格式】 SUBSTR(字符串表达式，起始位置 ,长度） 【功能】 从字符串表达式中的起始位置截取子字符串，长度为所截取的子
12、串的长度。 【例 1】store ”ABCDEFG” to CN? SUBSTR(CN，4，2),SUBS(CN,1,4),SUBS(CN,6,3)DE ABCD FG若省略长度，或者长度超过从起始位置到末尾的长度，则截取的子字符串为从起始位置到字符串表达式末尾的所有字符。例如：? SUBSTR(”计算机程序设计教程”，11)设计教程,2求字符串长度函数LEN() 【格式】 LEN字符串表达式 【功能】 返回字符串表达式中所包含的字符个数，即字符串长度。 【例 2】 ? LEN(”Visual FoxPro6.0”)16 3搜索子串位置函数AT() 【格式】 AT(字符串1，字符串2，) 【功
13、能】 寻找字符串1在字符串2中首次出现的起始位置。若字符串2中不包含字符串1，则返回值为零。若有“数值表达式”（假设数值表达式为K），则寻找字符串1在字符串2中第K次出现的位置。 【例 3】 X=”Visual FoxPro 6.0”? AT(”Fox”，X) & 显示结果为 8? AT(”fox”，X) & 显示结果为 0? AT(”o”，X) & 显示结果为 9? AT(”o”，X ，2) & 显示结果为 13,4空格函数SPACE() 【格式】 SPACE(数值表达式) 【功能】 产生与数值表达式的值相同的空格数。 【例 4】 ? ”学生”+SPACE(4)+”情况”学生 情况 在“ 学
14、生”和“情况”之间产生了4个空格字符。,5. 删除空格函数,（1）格式：LTRIM（) 功能：删除字符表达式值前的空格 （2）格式：RTRIM（或TRIM（) 功能：删除字符表达式值后的空格 （3）格式：ALLTRIM() 功能：将前后的空格去掉 举例： ? “AB”+SPACE(4)+”CD” &返回 AB CD ? ALLTRIM(“ ABCD ”) &返回 ABCD ? len(“ abcd”) &返回5 ? len(alltrim(“ ABCD “) &返回 4,6宏代换函数 & 【格式】&字符型内存变量 【功能】取“字符型内存变量”的值。 【说明】 (1) 宏代换是一种间接取值的操作
15、，在符号后面必须紧跟(无空格)一个己被赋过值的字符型内存变量的名字。(2)若&字符型内存变量与后面的字符之间无空格分界时，应加上“”符号作为分界符。(3)宏代换的使用可以嵌套另一个宏代换，但不能嵌套自己。例如，X=“&X”的写法是错误的。(4) 对于数字字符串，可以通过&函数使其与其他数字进行计算。,【例 5】求宏代换。. CH=”X”X=9? &CH &结果为：9TT=”学生成绩”USE &TT &结果为：打开了“学生成绩.dbf”表文件。X=”2004”M=”+”Y=”&X.&M.1”? Y &结果为：2004+1? &Y &结果为：2005,3.2.3 转换函数,【格式】 STR(数值表
16、达式，长度,小数位如） 【功能】 将数值表达式的值转换为由长度和小数位数指定的字符串。如果长度值比数值表达式的整数位数还要小，则返回由长度个“*”组成的字符串。 【例1】 ? STR(1324.46,6,1)1324.5? STR(1324.46,3,1)，STR(1324.46,8,3)* 1324.460,1数值转换为字符串函数STR(),【格式】 VAL(字符串表达式) 【功能】 将字符串表达式转换为数值型数据。 【例2】 ? VAL(”32”+”18”)321800 ? VAL(”112GH”)，VAL(”AB204”)，VAL(”ASD”)112.00 0.00 0.00,2字符串转
17、换为数值函数VAL(),【格式】 CTOD(字符串表达式) 【功能】 将“月/日/年”格式的字符串表达式转换为日期型数据。 【例3】 DA=”12/12/04”? CTOD(DA)12/12/04,3字符转日期函数CTOD(),【格式】 DTOC(日期)【功能】 将日期转换为相应的字符串。【例4】 D=2004/11/24DT=DTOC(D)? DT? LEN(DT)11/24/04 8,4日期型转换为字符串函数DTOC(),3-2-4 日期和时间函数,(1)格式：DATE() 功能：返回系统日期 (2)格式：TIME() 功能：返回系统时间 (3)格式：DATETIME() 功能：返回系统日
18、期时间 (4)格式：YEAR() 功能：返回中的年份，4位整型 (5)格式：month() 功能：返回中的月份 (6)格式：day() 功能：返回中的日期,3.2.5 测试函数,1测试文件头函数BOF() 【格式】 BOF() 【功能】 该函数用于测试指定文件中的记录指针是否指向文件头。如果是则返回真值，否则返回假值。 【例】 测试文件记录是否指向文件头。USE 学生档案.dbf? BOF() & 显示结果为：.F.SKIP -1 & 移动记录指针到上一条记录命令? BOF() & 显示结果为：.T.,【格式】 EOF() 【功能】 该函数用于测试指定文件中的记录指针是否指向文件尾。如果是则返
19、回真值，否则返回假值。 【例】 测试文件记录是否指向文件尾。USE 学生档案.dbfGOTO BOTTOM? EOF() & 显示结果为：.F.SKIP & 移动记录指针到上一条记录命令? EOF() & 显示结果为：.T.,2测试文件尾函数EOF(),【格式】 RECNO() 【功能】 测试指定表文件中的记录指针指向的记录号。若指定的工作区无打开的表文件，函数返回值为：0；若指定的表文件无记录或记录指针位于文件头，函数返回值为：1；若记录指针指向文件尾，函数返回值为末记录号加1。 【例 】 测试记录指针的当前位置（假设学生档案表中有10条记录）。USE 学生档案.dbfGOTO BOTTOM
20、? RECNO() & 显示结果为：10SKIP ? RECNO() & 显示结果为：11GO TOP ? RECNO() & 显示结果为： 1SKIP -1? RECNO() & 显示结果为： 1,3测试当前记录号函数 RECNO(),【格式】 VARTYPE (表达式)，(逻辑表达式) 【功能】 测试表达式的数据类型，返回用字母代表的数据类型。函数值为字符型。未定义或错误的表达式返回字母U。若表达式是一个数组，则根据第一个数组元素的类型返回字符串。 【例3-29】 测试记录指针的当前位置（假设学生档案表中有10条记录）。 a=DATE() b=NUll ? VARTYPE($385)，VA
21、RTYPE(”FoxPro”)，VARTYPE(a，.T)，VARTYPE(b) & 输出为：Y C D X。,4数据类型测试函数VARTYPE ( ),【格式】 BETWEEN(，下限表达式)，(上限表达式) 【功能】判断表达式的值是否介于相同数据类型的两个表达式值之间。BETwEEN()首先计算表达式的值。如果一个字符、数值、日期、表达式的值介于两个相同类型表达式的值之间，即被测表达式的值大于或等于下限表达式的值，小于或者等于上限表达式的值，BETWEEN()将返回T值，否则返回F 【例3-30】 Gz=375 ? BETWEEN(gz，260，650) & 显示结果为：T,5判断值介于两
22、个值之间的函数,【格式】 IIF(逻辑型表达式)，(表达式1)，(表达式2) 【功能】 若逻辑型表达式的值为.T，函数值为(表达式1的值，否则为的值。 【例3-31】 xb=“女“ ? IIF(xb=”男”，l，IIF(xb=”女”，2，3) & 显示结果为：2,6条件函数IIF(),【格式】 ISNULL() 【功能】 判断表达式的运算结果是否为 NULL 值，如果是，则返回逻辑真，否则返回逻辑假。 【例4】 STORE .NULL. TO A? A,ISNULL(A) &结果为：.NULL. .T.,7“空”值测试函数,【格式】 EMPTY(） 【功能】 根据表达式的运算结果是否为 “ 空
23、 ” 值， 返回逻辑真或逻辑假。 【说明】 （1）.当表达式的结果是含有空字符串或空格时， EMPTY 函数值返回为 .T. ， ISNULL 为 .F. 。 （2）.当变量是 .NULL. 时， EMPTY 和 ISBLANK 函数为 .F.，ISNULL 为 .T. 。 （3）.当变量是 0 时， EMPTY 函数为 .T. ， ISNULL 和 ISBLANK 为 .F. 。,8空值测试函数,3.2.6 用户定义对话框MESSAGEBOX（ ）函数的使用,MessageBox函数用于显示短信息。虽然，MessageBox显示的小窗口不具有什么功能，实际上它被认为是一个对话框。对话框是用户
24、与应用程序之间交换信息的最佳途径之一。使用对话框函数可以得到VFP的内部对话框，这种方法具有操作简单及快速的特点。MESSAGEBOX函数在对话框中显示信息，等待用户单击按钮，并返回一个整数以标明用户单击了哪个按钮。 1格式MESSAGEBOX（CMessageText,nDialogboxType,CTitleBarText） 2功能 该函数用于显示一个信息框。,3说明（1） CMessageText：表示显示在信息框中的正文内容。（2） nDialogboxType：确定消息框中要显示哪些按钮和图标，一般有3个参数。其取值和含义为：05：表示出现在信息框中的按钮，如表所示。,16, 32,
25、 48, 64 ：表示出现在消息框中的图标；,0，256，512 ：表示消息框中哪些是默认按钮。,（3）CTitleBarText：表示出现在消息框标题栏中的文本。若缺省此项，系统给出默认的标题：Microsoft Visual FoxPro（4）MESSAGEBOX()函数的返回值是一个数值，用于确定在消息框中选择了哪个按钮。,（5）如果省略了某些可选项，必须加入相应的逗号分隔符。在程序运行的过程中，有时需要显示一些简单的信息如警告或错误等，此时可以利用“信息对话框”来显示这些内容。当用户接收到信息后，可以单击按钮来关闭对话框，并返回单击的按钮值。,4举例用MESSAGEBOX()函数显示一
26、个消息框，正文为“这是一个教师工资管理的数据库”，消息框中有“确定”，“取消”按钮，有问号图标，“取消”按钮是默认按钮，消息框标题栏中的文本为“消息框”。通过窗口显示该信息如图例。 ？MESSAGEBOX(“这是一个教师档案管理的数据库！”,3+64+512,”消息框”),3.3 操作符及表达式,操作符是表示数据之间运算方式的运算符号，一般根据处理数据类型不同可分为算术运算符、字符运算符、关系运算符、逻辑运算符四种。表达式是由常量、变量、函数、操作符及圆括号组成的算式。表达式中的操作对象必须具有相同的数据类型，如果表达式中有不同类型的操作对象，则必须将它们转换成同种数据类型。,算术表达式是由数
27、值型变量、常量、函数和数值操作符组成的。用于对数值型数据进行常规的算术运算。,3.3.1算术表达式,算术运算符,举例： ? 5/3 结果：1.67? 5%3 结果：2? -3*2-5 结果：4.00 ? 2*7%32+3 结果：8,高,算术运算符,举例 ? 3/2 &返回1.5 ? 5.5%3 &返回2.5 ? Int(5/3) & 1,取得数值的整数部分 ? 62 &返回36 ? 2001-12-29+4 &返回2002-1-2 ? 2002-3-1 -2001-12-29 &返回62 ? 2002-3-1 1 &返回2002-2-28 ? 2000-3-1 1 &返回2002-2-29,3
28、.3.2 字符表达式：,字符表达式是由字符型变量、常量、函数和字符操作符组成的。用于字符串的连接或者比较。 字符串操作符为：+：连接两个字符串。-：连接两个字符串，并将第一个字符串尾部的空格移到第二个字符串的尾部。$：判断第一个字符串是否是第二个字符串的子字符串。,例如： LEN1=”Visual FoxPro6.0 ” LEN2=”数据库教程” ? LEN1+LEN2 & 结果为：Visual FoxPro6.0 数据库教程 ? LEN1-LEN2 & 结果为：Visual FoxPro6.0数据库教程 ? len(LEN1-LEN2) & 结果为：28,3.3.3 日期时间表达式,日期时间
29、表达式是由日期时间型变量、常量、函数和日期时间操作符组成的。 日期时间操作符有： +：添加一个天数或秒数 -：减少一个天数或秒数 例如：? 2005-04-04+10 &结果为：04/14/05? 2005-04-30-15 &结果为：04/15/05? 2003-08-04 10:10a+10 &结果为：08/04/03 10:10:10 AM? 2003-08-04 10:35p-10 &结果为: 08/04/03 10:34:50 PM,3.3.4 关系表达式,关系表达式用于数值、字符、日期型数据的比较运算。关系表达式的运算优先级相同。,例如: ？ ”xyz”#”XYZ” & 值为.T.
30、？ ”abcd”=”abc” & 值为.T.？ ”abc”=”abcd” & 值为.F.？ ”abcd”=”abc” & 值为.F.,逻辑表达式是由逻辑型变量、常量、函数和字符运算符组成的。用来对逻辑型数据进行各种逻辑运算，形成各种简单的逻辑结果。,3.3.5 逻辑表达式,高,例如 ？ 1733 .AND3412 & 值为.F.？ 16/27 .0R. ”abc”#”ABC” .AND. NOT.F & 值为.T.,在多个逻辑值中进行判断，一般用于判断某几个条件是否满足 运算对象和运算结果均为逻辑型 运算符 OR或.OR.：逻辑或，只有两个运算对象均为.F.时，返回.F.；其余均返回.T.AN
31、D或.AND.：逻辑与，只有两个运算对象均为.T.时，返回.T.；其余均返回.F.NOT或.NOT.：逻辑非，运算对象为.T.时，返回.F.；运算对象为.F.时，返回.T.,3.3.6 空值（null）,空值是一个重要的概念。空值就是没有任何值。对数值，它非零；对字符，它非空格串；对逻辑，它非真非假。在应用中，空值的概念是十分有意义的。年龄不知道时，不能填零；姓名不知道时，不能填空字串等。 1 空值的表示 空值的表示为： .NULL. 2 变量中空值的表示 内存变量、数组变量、字段变量均可以赋以空值。变量赋以空值后，其类型不变。也就是说空值不是一个数据类型。,例：a=“ “ & a为空格字串
32、b=“ & b为空字串 c=.null. & c赋以空值，但不改变其类型 ? empty(a),empty(b) &结果： .T. .T. ? isblank(a),isblank(b) &结果： .T. .T. ? isnull(a),isnull(b),isnull(c) &结果:.F. .F. .T. ? type(“c“) &结果为： N,3.表达式中关于空值的处理 在函数的参数中（isnull()等例外）或表达式中因空值而使结果未知时，其结果就为空值。 例：m=0 m=.null. ? m+4 &结果为：.null. x=.t. ? x and .null. &结果为： .null.
33、 ? x or .null. &结果为： .T. ? not .null. &结果为： .null.,运算符同级：从左到右 运算符不同级,表达式的运算顺序,表达式举例：,? (SQRT(32*2)/4+6)*5-20 ? (SQRT(32*2)/4+6)*5-2030 ? “cd”$ “abc”+”def” ? Date()=2002-3-8 A=5 b=4 c=6 ? ab and ac ? Ab and a+bc,小 结,本章简要介绍了Visual FoxPro 6.0数据库系统中数据的基础概念。这一章的内容是学习后面章节和进一步开发数据库应用系统的必备的基础知识。要求读者全面掌握。掌握数据类型和数据存储（常量、变量、数组、字段、对象）的方法 掌握各类型数据运算的操作符、表达式 掌握常用系统函数的用法 掌握NULL值的处理方法,一、思考题 1 表达式的组成是什么？ 2 如何查看表达式的结果？ 3 什么是逻辑操作符？ 4 常用系统函数与表达式的区别？ 5 空值的含义是什么？,第3章 思考与练习,二、选择题 1、2、3、4、5、6、7、8、9、10三、填空题 1、2、3、4、5、6、7、8、9、10,
