VF实验指导三

实验3：变量、函数和表达式实验

2.1 系统变量实验

（1）用系统变量_diarydate输出当天日期；

（2）将2007年5月1日赋值给系统变量_diarydate并输出。

2.2 内存变量实验

（1）建立4种类型(N、C、L、D)的内存变量并分别赋值为：23、”Visual FoxPro 6.0”、.T.、{^2007-10-20}；

（2）建立x1(2)和x2(2,2)数组，给数组各元素赋4种类型(N、C、L、D)的值并输出；

（3）使用DISP MEMO 和LIST MEMO命令，分别显示内存变量及数组变量，注意这两条命令的区别。

2.3几种常用函数的使用实验

（1）输出下列算术函数

?abs(-11.9),sqrt(5),exp(3)

?log(2.9876),int(-6.2534),round(21234.5678,-2)

（2）输出下列字符运算函数

?len(“Hello”),left(“Im a student”,2)

?right(“Im a student”,7),substr(“Im a student”,6,7)

（3）输出下列日期函数

?date(),time(),datetime(),cdow(datetime())

（4）输出下列各类型转换函数

?asc(“xyz”),chr(98),str(323.5566,6,2)

?val(“123.45a6”),upper(“a”),lower(“A”)

（5）字符运算函数宏函数&

在命令窗口输入：

a=1b=2c=3yy=’a+b+c’?yy,&yy

2.4 字符和数值函数应用实验

设有如下字符串：

“Visual foxpro 6 is database management system.”

要求编写命令完成以下目的：

(1) 用函数方法将foxpro改为FoxPro，将database改为DataBase。

提示：使用检索字符替换函数strtran(),其语法格式为

Strtran(<源字符串表达式>,<被替换的字符串表达式>,<用于替换的字符串表达式>)

(2) 取该字符串长度除以6的余数。

(3) 在该字符串两边各增加”***”字符串。

(4) 将第6个字母的ASCII值减去32再放回到原位置。

2.5 逻辑与日期函数实验

(1) 给内存变量a1赋值6，给内存变量a2赋值20：

 测试a1是否位于1~20之间；

 测试a1变量的数据类型，测试a1是否为空；

 测试a2变量的值是否大于10，是则返回“是”，否则返回“不是”。

(2) 输出当前时间的年、月、日、星期几。

(3) 输出datetime()函数的年

2.6对各种类型表达式进行求值实验

(1) 给各变量赋值：a=2,b=3,c=4,e=5,f=6,输出下面表达式的值及类型：b+(2+c)/a/((e+f)*(a+b))

(2) 对下列各个表达式求值：

 “ABC”=”ABCE123”和”ABCE123”=”ABC”;

 “ABC”$”123ABC”和”123ABCDE”$”ABC”

”ABCE123”=”ABC”和”ABCE123”==”ABC”

(3) 在命令窗口给各变量赋值：

a=1, b=2, c=3, x=123, aa=”机电学院”, bb=”机设”, cc=”05”,

dd=aa+space(1)+bb+space(1)+cc, ee=substr(dd,9,10)

 求逻辑表达式：(b**2-4*a*c)>0 .AND. (b+a+c)/b>0的值；

 求表达式：aa$ee, ee$cc, ee$dd, AT(cc,ee), ee-aa+bb的值；

 求表达式：NOT a>b AND aa=”机电学院” OR c+30>200的值

(4) ASC(“A”)MAX(-11,22.2).AND.MOD(22,5)

(5) REPLICASE(STR(321+VAL(“32A1”),3),3)

(6) 求函数TYPE(“X”)的值，LEN(“&X”)的值

(7) MONTH(CTOD(“12-21-2006”))+40

(8) DAY(CTOD(“12-21-2006”))+40

(9) YEAR(CTOD(“12-21-2006”))+40

本文来源：https://www.2haoxitong.net/k/doc/0767c9c376c66137ef061965.html