一、实验目的
1．熟悉Visual FoxPro常用内部函数的使用。
2．了解Visual FoxPro运算符的运算规则。
3．掌握Visual FoxPro表达式的书写。
二、实验内容及上机步骤
【上机题一】
VisualFoxPro常用内部函数的使用
【上机步骤】
本题的知识点是Visual FoxPro常用内部函数，操作步骤如下
（1） 数值函数, 分别执行如下命令，观察显示结果
?SQRT(3*3+4*4)
?INT(5.7),INT(-5.7),CEILING(5.7),CEILING(-5.7),FLOOR(5.7),FLOOR(-5.7)
?MOD(34,7), MOD(34,-7), MOD(-34,7), MOD(-34,-7)
?ROUND(3.14159,2),ROUND(5678.45,-2)
（2） 字符函数, 分别执行如下命令，观察显示结果
A1="1"
A2="2"
A12="B"
B=MAX(05/01/01,96/12/04)
?A&A1.&A2.,&A12
?AT("姓","姓名"),AT("PRO","VisualFoxPro"),ATC("PRO","Visual FoxPro")
?LEN(ALLTRIM(SPACE(8)))
?SUBSTR(“Visual FoxPro内部函数”,8,6),LEFT(“电脑病毒:”,2),RIGHT(“杀毒软件”,4)
（3） 日期和时间函数, 分别执行如下命令，观察显示结果
?YEAR(DATE()),MONTH(DATE()),DAY(DATE())
?HOUR(DATETIME()),MINUTE(DATETIME()),SEC(DATETIME())
（4） 数据类型转换函数, 分别执行如下命令，观察显示结果
?DTOC(DATE())
?STR(34.56,10,1),STR(34.56,10,2),STR(34.56,6),STR(34.56,3),STR(34.56)
?LEN(STR(34.56,6)),LEN(STR(34.56,3)),LEN(STR(34.56))
?VAL("12"),VAL("-12"),VAL("1A"),VAL("B2")
（5） 测试函数, 分别执行如下命令，观察显示结果
?VARTYPE($234),VARTYPE("A"),VARTYPE(A),VARTYPE(DTOC(DATE()))
?IIF(3+65>70,.T.,.F.)
【上机题二】
VisualFoxPro运算符与表达式
【上机步骤】
本题的知识点是Visual FoxPro运算符与表达式，操作步骤如下
（1）算术运算符与表达式的练习。分别执行如下命令，观察显示结果
?3*5*12/4^2
? (4^5+5^5)/(sqrt(4+5)-4*5)
（2）字符运算符与表达式的练习。分别执行如下命令，观察显示结果
a= "电 脑 "
b= " 计 算 机"
?a+b,a-b
（3）日期和时间运算符与表达式的练习。分别执行如下命令，观察显示结果
?DATE()-{^2005/09/01}
?DATE()-120,DATE()+120
（4）关系运算符与表达式的练习。 分别执行如下命令，观察显示结果
?"飞机">"轮船", "xy">"x", " ">"x", "AB" > "ab"
SET EXACT OFF???
?"电脑"="电脑病毒","电脑病毒"="病毒"
? "病毒"= ="电脑病毒","电脑病毒"= ="病毒"
SET EXACT ON???
?"病毒"="电脑病毒","电脑病毒"="病毒"
? "病毒"= ="电脑病毒","电脑病毒"= ="病毒"
? "电脑病毒"$"病毒","病毒"$"电脑病毒"
（5）逻辑运算符与表达式的练习，分别执行如下命令
a=5>3
b=3>5
?a AND b, a OR b, NOT a, NOT b AND .F.
【上机题三】
VisualFoxPro综合表达式的应用
【上机步骤】
本题的知识点是VFP表达式的书写，操作步骤如下：
（1）写出下列算术式子的表达式，并求其值。
① 
??????????????②
③ ，设x=3,y=2
分别执行如下命令:
?1/2+14/21+3/5
?SIN(PI()/6)+TAN(PI()/3)
x=3
y=2
?(x^5+y^5)/(SQRT(x+y)-x*y)
（2）写出判断闰年的表达式（能被4整除但不能被100整除，或者能被400整除的年份就是闰年）。
?? 分别执行如下命令:
y=YEAR(DATE())
?IIF((y%4=0 and y%100!=0) or y%400=0,"是闰年","不是闰年")
（3）计算距离明年元旦还有多少天？（假设今年为2005年）
分别执行如下命令:
?{^2006/01/01}-date()
（4）设直角三角形的一条直角边长为4，斜边长为5，求另一条直角边之长。
分别执行如下命令:
a=4
c=5
b=SQRT(C*C-A*A)
?b