Visual foxpro讲义第五章 函数

•Visualfoxpro讲义第五章

,\^0\^0f1^0.

*

:Visualfoxpro讲义第五章函数

•Visualfoxpro讲义第五章

0S^°\^00^/S^0°^\f1^0.

:5.1字符处理函数

■

,子字符串位置函数at

：格式：at（v字符表达式1＞,＜字符表

r"^

：达式2＞卜数值表达式刁）

■Visualfoxpro讲义第五章

,\^0\^0f1^0.

«

:功能：当字符表达式1存在于字符表

:达式2中时，以整数值返回其存

:在的位置

♦Visualfoxpro讲义第五章

说明：如果表达式1未出现在表达式2

:之中，返回值为0，如果加入〈数

，值表达式〉参数,则foxpro就从

:〈字符表达式2>中找第〈数值表

:达式〉次出现的〈字符表达式1>

:此函数对字符的大小写是敏感

的.

Visualfoxpro讲义第五章

•/SP*°\^0°^>

例子：？At(“ab”Jcdefab”)

charl="alexalex”

char2=“al”

?at(b,a,2)

Visualfoxpro讲义第五章

\^0°^Ti

at（“工商”J沈阳药科大学工商

管理学院”）

13

at（“学”，沈阳药科大学工商管

理学院\2）

.Visualfoxpro讲义第五章

,\^0\^0f1^0.

•2字符串长度函数len

:格式：len（v字符型表达式,）

:功能：求出给定字符串的长度.

:例子：

?len(“thisisafoxproprogram.")

25

•Visualfoxpro讲义第五章

,0^>\^0\^0f1^0.

•3截取左子串函数left

：格式：left（〈字符表达式》,〈数值

:表达式〉）

:功能：从字符表达式的最左边一个

•字符起，向右截取〈数值表达

♦式〉个字符

•Visualfoxpro讲义第五章

0S^0°^\<1^0

:例子：left(ufoxpro2.5fordos”,6)

.•

-•foxpro

：4截取右子串函数right

格式：right（v字符表达式〉，〈数值

表达式,）

■Visualfoxpro讲义第五章

,\^0\^0f1^0.

;功能：从字符表达式的最右边一个

:字符起，向左截取〈数值

:表达式〉个字符

.

•例子：left(^foxpro2.5fordos”,3)

dos

.Visualfoxpro讲义第五章

,\^0\^0f1^0.

«

:5删除字符串前导空格函数ltrim()

:格式：Itrimv字符表达式,

・功能：删除一个字符串左起的空格

,例子：?ltrim(wabed”)

.Visualfoxpro讲义第五章

,\^0\^0f1^0.

:6删除字符串尾部空格函数rtrim()

:格式：rtrim〈字符表达式,

:功能：删除一个字符串末尾的空格

命例子：?ltrim(uabcd”)

.Visualfoxpro讲义第五章

,\^0\^0f1^0.

«

•7删除字符串前导和尾部空格函数alltrim。

•格式：alltrim〈字符表达式〉

:功能：删除一个字符串的前导和末尾的空

t格

例子：?alltrim(uabed")

•Visualfoxpro讲义第五章

,0^>\^0\^0f1^0.

，8字符串替换函数stuff()

;格式：stuff(〈字符表达式1>,［起始位］,

:〈字符个数〉，〈字符表达式2>)

B功能：用〈字符表达式2>去替换

E〈字符表达式1>中的从第〈起始位〉

2开始所指定的〈字符个数〉个字符

.Visualfoxpro讲义第五章

.0^>\^0\^0/^0.

:例子:stuff(“沈阳药科大学药学院”，

:13,6”工商管理学院”J

•沈阳药科大学工商管理学院

♦

・

.

Visualfoxpro讲义第五章

0^>\^0\^0f1^0.

:9截取子字符串函数substr()

”•格式：substr(〈字符表达式1＞,

:〈开始位置刁，〈字符个数＞])

:功能：对〈字符表达式＞从〈开始位置〉处截

B取〈字符个数,个字符，

；•如省略〈字符个数〉则从〈开始位置,

:处截取到串尾

♦Visualfoxpro讲义第五章

,\^0\^0f1^0.

例子：?substr(ufoxproforwindows"J2)

windows

?substr(66foxproforwindows”J2,3)

win

♦Visualfoxpro讲义第五章

.0^>/^0.

10大写字母函数upper()

格式：lipper(〈字符表达式,)

功能:将字符表达式中的小写字母转换成

大写字母

彳列子：？Upper(“abCd”)

ABCD

.Visualfoxpro讲义第五章

.0^>\^0\^0f1^0.

:11小写字母函数lower()

:格式：lower(〈字符表达式,)

♦功能:将字符表达式中的大写字母转换成

:小写字母

:例子：？lower(“abCd”)

•abed

.Visualfoxpro讲义第五章

.12宏代换函数&（详见前面）

•13测试子串函数$

♦格式:〈字符表达式1>$〈字符表达式2>

:功能：当〈字符表达式1>包含于〈字符表达

:式2>中时，返回真值1,反之，则返回假

:值f

•例子：?Mfoxw$wfoxprow.t.

•?“fp”$wfoxprow.f.

..Visualfoxpro讲义第五章

0S^°\^00^/S^0°^\<1^0.

•14第一个字母转换为大写函数proper()

♦格式：proper(v字符表达式,)

:功能：该函数将字符型表达式值中每个字的

三第一个字母转换为大写,其它字母转换

♦为小写

*例子：?propernhisisafoxproprogram^)

.ThisIsAFoxproProgram

•Visualfoxpro讲义第五章

,0^>\^0\^0f1^0.

••15重复字符串函数replicate()

.：格式：replicate(〈字符表达式〉，〈数字表达式》)

:功能：该函数多次重复字符型表达式值,生成一

B个新的字符串，数值型表达式值是重复次

：数

•例子：?replicate(669\60)

♦Visualfoxpro讲义第五章

.0^>\^0\^0/^0.

•16重复空格函数space。

■

♦格式：space(v数值表达式,)

:功能：该函数生成一个空格个数为数值型表

:达式值的串

・例子：？space(30)

:生成30个空格

•Visualfoxpro讲义第五章

0f1^0.

一■

，17空串测试函数empty()

•格式:empty(v字符型表达式,)

:功能:若字符型表达式值为空值或全为空格，

a则函数返回真值,否则返回假值

*例子：mvar=space(20)

•?empty(mvar)

♦Visualfoxpro讲义第五章

,f1^0.

18字母开头测试函数isalpha()

格式：isalpha(v字符型表达式,)

:功能:若字符型表达式值是以字母开头,则函数

:返回真值，否则返回假值.

•例子：？isalpha("abl2”).t.

:?isalpha(“12ab”).f.

Visualfoxpro讲义第五章

\^0\^0f1^0.

19大写字母开头测试函数isupper()

格式：isupper(〈字符型表达式,)

功能:若字符型表达式的值是以大写字母开头

则函数返回真值,否则返回假值

例子：？isupper(“Abcd”).t.

?isupper(“abcd”).f.

?isupper(a12abcdw).f.

Visualfoxpro讲义第五章

\^0\^0f1^0.

20小写字母开头测试函数islower()

格式：islower(〈字符型表达式〉)

功能:若字符型表达式的值是以小写字母开头

则函数返回真值,否则返回假值

例子：？isupper(“Abcd”).f.

?isupper(wabcd,?).t.

?isupper(a12abcdw).f.

•Visualfoxpro讲义第五章

,\^0\^0/^0.

，21数字开头测试函数isdigit()

♦格式：isdigit(v字符型表达式,)

＞功能:若字符型表达式的值是以数字(0—9)开

[*头，则函数返回真值,否则返回假值

令例子：？isdigit(“Abed”).f.

?isdigit(“abcd”).t.

?isdigit(“12abcd”).f.

.Visualfoxpro讲义第五章

,\^0\^0

♦22子字符串检索函数(不分大小写)atc()

:格式：ate(〈字符表达式1>,〈字符表达式2>,

:[V数字型表达式刁)

,功能：同at()函数，只是区分大小写

♦

,例子：？atc(“ab”JedefAb”)5

?atc(“ab”JcabdefAb”,2)7

，•Visualfoxpro讲义第五章

0S^°\^00^\0^/s^0°^\<1^0.

,23子字符串反向检索函数rat()

:格式：rat(〈字符表达式1>,V字符表达式2>,

:卜数字型表达式刁)

・功能：同at()函数，只是从右开始检索

■

a例子：？rat("ab”Jcdabcdab")7

?rat(“ab”Jcdabcdab")3

♦Visualfoxpro讲义第五章

.0^>\^0\^0/^0.

5.2数学处理函数

1几值函数pi()(近似值为3.14159)

pi()*r*r

2正弦函数sin()

格式:sin(v数字型表达式〉)

说明:返回数值表达式的正弦值，数字表达

式是以弧度为单位角的值

.Visualfoxpro讲义第五章

.0^>/^0.

*

3余弦函数cos()

4正切函数tan()

5反正弦函数asin()

6反余弦函数acos()

7反正切函数atan()

・

.

..Visualfoxpro讲义第五章

0S^°\^00^/S^0°^\<1^0.

18度转换成弧度的函数dtor()

■

•格式：dtor(v数字型表达式,)

:功能：dtor()将以度为单位的数字型表达

:式值转换成以弧度为单位.

:例子：？dtor(90)1.57

；•?dtor(180)3.14

♦Visualfoxpro讲义第五章

.0^>/^0.

9弧度转换成度的函数rtod()

格式：rtod(〈数字型表达式,)

功能：rtodO将以弧度为单位的数字型表

达式值转换成以度为单位.

例子：？dtor(1.57)90

?dtor(3.14)180(近似值)

♦Visualfoxpro讲义第五章

,\^0\^0f1^0.

10取绝对值函数abs()

格式：abs(＜数值型表达式,)

功能：该函数返回数值表达式的绝对值.

例子：?abs(-4.5)

4.5

..Visualfoxpro讲义第五章

0S^°\^00^/S^0°^\<1^0.

Z11取整函数into

:格式：int((数字型表达式力

:功能:int()函数截去数字表达式值的小数

、部分，返回整数部分.

:例子：?int(10.56)

K10

♦Visualfoxpro讲义第五章

,\^0\^0f1^0.

12符号函数sign()

格式：sign(〈数字型表达式》)

功能：

1x>0

y=<0x=0

-1x<0

♦Visualfoxpro讲义第五章

,\^0\^0f1^0.

13求平方根函数sqrt()

格式：sqrt(〈数字表达式〉)

功能:用于求数字型表达式的平方根，数字

型表达式的值为非负数

例子:?sqrt(9)

3.00

•Visualfoxpro讲义第五章

0S^0<1^0

14指数函数exp()

格式：exp(〈数字型表达式,)

功能：该函数返回以e为底,以数字型表达

式值n为指数(e＞的值.

例子：？exp(5)

.Visualfoxpro讲义第五章

,f1^0.

•附力口：nm

funcnm

paran'm

s=l

for1=1tom

s=s*m

endfor

returns

.Visualfoxpro讲义第五章

.0^>\^0\^0/^0.

■15自然对数函数log()

•16以10为底的对数函数loglO()

•17最小整数函数ceiling。

*格式：ceiling(〈数字型表达式〉)

:功能：该函数返回大于等于数字型表达式的

:最小整数

•例子：?ceiling(9.5)10

>?ceiling(-9.5)-9

.Visualfoxpro讲义第五章

,\^0/^0.

:18最大整数函数floor。

;格式：floor(〈数字型表达式,)

C功能：该函数返回小于等于数字型表达式的

，:最大整数

;例子：？floor(9.5)9

卜.?floor(-9.5)-10

.Visualfoxpro讲义第五章

.\^0\^0/^0.

.・

•9四舍五入函数round。

格式：round(v数字型表达式l>,v数字型表达式2>)

。能：该函数对数字型表达式1进行四舍五入运算,

:数字型表达式2的值为正数时，是保留小数的

:位数;为负数时,是舍入整数的位数.

子:?round(646.666<2)600

:?round(666.666广3)1000

.Visualfoxpro讲义第五章

.0^>°^>\^0\^0°^>/^0：

:20最小值函数min（）

•格式：min（〈表达式1〉,〈表达式2>,[…]）

:功能：该函数返回两个或两个以上表达式值中

:最小的一个.该函数可以用于数字型表达

:式，日期型表达式和字符型表达式，但同

♦时出现的表达式类型必须相同.

•例子：？min（5周6）5

?min({人1998・09-09},{人1998-09-10})

.Visualfoxpro讲义第五章

.0^>°^>\^0\^0°^>/^0：

:21最大值函数max()

>格式：max(v表达式l>,v表达式2>J…])

:功能：该函数返回两个或两个以上表达式值中

:最大的一个.该函数可以用于数字型表达

:式，日期型表达式和字符型表达式，但同

•时出现的表达式类型必须相同.

■例子:?min（5周6）8

•Visualfoxpro讲义第五章

0S^0<1^0

•?min({人1998-09-09},{人1998・09-10})

(适用于foxpro6.0)

.?min({1998-09-09},{1998-09-10))

(适用于foxpro2.6fordos)

max()函数同min()函数

Visualfoxpro讲义第五章

f1^0.

*22between函数

•格式:between(v表达式l>,v表达式2>,v表达式3>

:功能:若表达式1的值大于等于表达式2的值，并且

小于等于表达式3的值，则函数返回真值，否

则返回假值.between函数可以用于数字型

表达式，日期型表达式和字符型表达式，但

同时出现的表达式类型必须相同.

.Visualfoxpro讲义第五章

.0^>\^0\^0f1^0.

1列子：

:?between(243).t・

•?between(“ab”,“ab",“abc").t.

•?between({08/02/99},{09/02/99},{09/03/99})

•Visualfoxpro讲义第五章

,0^>\^0\^0f1^0.

:23求模函数mod。

:格式：mod（〈数字表达式1>,<数字表达式2>）

,功能：该函数用于求数字表达式1除以数字表

Z达式2的余数

;说明：若数字表达式2大于0,则余数取正数，若

•数字型表达式2小于0则余数取负数

.Visualfoxpro讲义第五章

.\^0\^0f1^0.

:例子：

:1当数2为负时，取比数1大,但是数2的倍数的

♦最小整数.

:2当数2为正数，数1为负数时,取比数1小，但

:是数2倍数的最小值

•3当数1和数2同时为负数时，情况同1

♦Visualfoxpro讲义第五章

.0^>\^0\^0/^0.

,?mod(22J0)2

♦?mod(22r10)-8

:?mod(-22<10)-2

:?mod(-22J0)8

>?mod(-21,4)3

•?mod(-21<4)-1

:?mod(2r3)-1

•Visualfoxpro讲义第五章

,\^0\^0f1^0.

:24财务计算函数（略）

•Visualfoxpro讲义第五章

,0^>\^0\^0f1^0.

♦5.3日期和时间函数

：1系统日期函数date。

：2日期空值测试函数empty（〈日期型表达式力

?3日月年函数dmy（<日期型表达式,）

♦该函数将日期型表达式值转换为日月年形式.

:其中日为2位，月为英文月份名，年通常为2位

!：4月日年函数mdy（v日期型表达式〉）

..Visualfoxpro讲义第五章

0S^°\^00^/S^0°^\<1^0.

95日函数day（〈日期型表达式〉）

♦功能:该函数从日期型表达式值中取出日的

:数值.

g6月函数month（〈日期型表达式力

♦功能:该函数从日期型表达式值中取出月的

数值.

..Visualfoxpro讲义第五章

0S^°\^00^/S^0°^\<1^0.

:7文字月函数cmonth（v日期型表达式>）

・功能:该函数从日期型表达式值中取出月的

:数值.返回月的英文名字

:8年函数year（〈日期型表达式,）

:功能:该函数从日期型表达式值中取出年的

9数值.

•Visualfoxpro讲义第五章

,0^＞\^0\^0f1^0.

.9星期几函数dow（＜日期型表达式,）

;功能：该函数从日期型表达式中求出当日是星

•期几的数值,取值在1—7之间,1为星期日

p,2为星期一,…,7为星期六.

］：10文字星期几函数dow（＜日期型表达式〉）

:功能：该函数从日期型表达式中求出当日是星

k期几的英文名字.

Visualfoxpro讲义第五章

.“Igomonth()函数

嘀式：gomonth(v日期型表达式＞,v数字型表达式>

能:该函数返回由日期型表达式指定的日期前后

n个月的日期.11为数字型表达式的值，若值为］

正数，则函数返回指定日期之后n个月的日期;

值为负数，则函数返回指定日期之前n个月的］

日期.I

Visualfoxpro讲义第五章

xl

?gomonth({09/30/94)<5)

?gomonth({09/30/94),5)

?gomonth({09/30/94),9)

12儒略历日期函数（略）

•Visualfoxpro讲义第五章

,0^>/^0.

..13当前系统时间函数time。

:格式:time（［v数字表达式刁）

,功能：该函数按24小时制以字符串形式返回系

a统时间.若不指定数字型表达式，则以

hh:mm:ss形式返回;若指定数字型表达

式,则以hh:mm:ss.99形式返回，这里的

hh表示小时,mm为分师为秒.99为百分

秒

•Visualfoxpro讲义第五章

0\^0\^0f1^0.

一■

•?time(99)?time()?time(8)

♦14午夜后的秒数函数seconds。

1说明：该函数以数值形式返回当前系统时间

，从午夜到现在已过去的秒数.

B15午夜后的秒数函数sys(2)

:说明：该函数以字符形式返回当前系统时间

:从午夜到现在已过去的秒数.

■Visualfoxpro讲义第五章

.\^0\^0f1^0.

，16设置年格式setcenturyon|off

:说明:若为。ff状态时，则用2位数字表示年

:份，若为on状态时，则用4位数字表示

■年份，在on状态下，虽然输入输出时

•年用4位数字，但它不影响foxpro内

:部以2位数字的存放形式

•Visualfoxpro讲义第五章

,0^>/^0.

•♦17设置日期分隔符setmark命令

:格式：setmarkto〈字符型表达式,

:功能：该命令用于设置日期格式年，月,日之间

a的分隔符为字符型表达式值的字符，若

不指定字符型表达式，则系统默认分隔

符为setdate命令设置.

例子：setmarkto"J

?date()

.Visualfoxpro讲义第五章

.0^>\^0\^0/^0.

.5.4不同类型数据转换函数

:5.4.1数字型与字符型间转换函数

♦1字符型转换成数值函数asc()

:格式：asc(<字符型表达式,)

:功能：该函数将字符型表达式值的第一个

:字符转换成ASCII码的数值.

•例子：？asc(“ab”)97

•?asc(“lab”)49

.Visualfoxpro讲义第五章

,\^0\^0f1^0.

*2数值转换成字符函数chr()

:格式:chr(v数值型表达式＞)

:功能：该函数将数字型表达式值作为

♦ASCII码转换成相应的字符.

•例子：?chr(97)a

.Visualfoxpro讲义第五章

.\^0\^0f1^0.

I,3数值型转换成字符函数str()

:格式:str(〈数值型表达式刁，〈长度〉,〈小数位刁)

.功能：该函数将数字型表达式的值转换为字符串，

,♦长度是转换后的字符串总长度，若不指定长

:度，则默认为10位，小数位为输出小数点后

面的位数，若指定的位数小于实际的位数，

::则进行截取，而不四舍五入,若长度小于整

一♦数部分的长度，则函数返回一串星号.若长

:度大于实际总长度,则前面补空格

.Visualfoxpro讲义第五章

.\^0\^0f1^0.

♦例子：

:(1)当输出长度与整数位相同

*?str(10111.222,5,2)10111

:(2)当输出长度小于整数

♦?str(101111.222,5,2)*****

:(3)当输出长度比整数位大1时

:?str(10111.222,6,2)10111小数点占位

.Visualfoxpro讲义第五章

,\^0\^0f1^0.

«

■

，(4)当输出长度比实际总长度大时，前补空格

.

•?str()10111.2224092)10111.22

:?str(10111.222,7,2)10111.2

•Visualfoxpro讲义第五章

0\^0\^0f1^0.

一■

•4字符型转换数字型函数val()

,

,格式：val(〈字符型表达式〉)

；功能：该函数将字符型表达式值的字符串转

?换为数值.该函数从左边开始向右取字

♦符，忽略先导空格,当遇到非数字字符或

:字符全取完结束.若字符型表达式不是

I:以数字或空格开始，则函数返回数字0

•Visualfoxpro讲义第五章

,f1^0.

,例子:

?vab(“ab”)0.00

.?vab(“lab”)1.00

*？vab(“1”)1.00

•Visualfoxpro讲义第五章

0\^0\^0f1^0.

■

・5.4.2日期型与字符型间转换函数

Zi字符串转换为日期型函数｛｝

:格式：｛〈文字日期〉｝

,功能：文字日期为mm/dd/yy或mm/dd/yyyy

卜.

•例子：｛09/09/99)

.Visualfoxpro讲义第五章

0^>\^0/^0.

.

■2字符型表达式转换为日期型函数ctod()

格式：ctod(〈字符型表达式,)

功能：该函数将字符型表达式值的日期

格

式字符串转换为日期型数据.字符

型表达式值可以是mm/dd/yy或

mm/dd/yyyy

例子：？ctod(“09/09/99”)

no/no/oo

■Visualfoxpro讲义第五章

.0^＞\^0\^0/^0.

.3日期型转换为字符型函数dtoc()

:格式：dtoc(＜日期型表达式＞[,1])

・功能：(1)该函数将日期型表达式的值转换为

:字符型数据.返回值的格式取决于

asetcentury和setdate两个命令的

:设置,默认为mm/dd/yy

・(2)若指定选择项1,则函数返回格式为

:yyyymmdd格式，而且不受

♦setcentury和setdate命令的影响.

Visualfoxpro讲义第五章

0^>\^0\^0/^0.

例子：?dtoc({09/09/99))

“09/09/99"

4日期型转换为字符型函数dtos。

格式：出os(<日期型表达式〉)

功能：该函数将日期型表达式值转换为字符，

则函数返回格式为yyyymmdd格式,而且不

受

sei

Visualfoxpro讲义第五章

S^°S^°S^0<1^0

例子:

?dtoc(date(),l)

.?dtoc(date())

.

?dtos(date())

■

•Visualfoxpro讲义第五章

,\^0\^0f1^0.

•5.5测试函数

♦1测试数据类型函数typeO

•格式：type（＜“表达式”＞）

:功能：测试引号内表达式的数据类型.先计

:算表达式的值，然后用一个大写字母

•返回表达式的数据类型.可能返回的

:字符有6种如下：

♦Visualfoxpro讲义第五章

.0^>/^0.

，C字符表达式

1•

>N数值表达式

日期表达式

逻辑表达式

备注表达式

u未定义类型表达式

说明：一定要注意有引号

•Visualfoxpro讲义第五章

.\^0\^0f1^0.

.例子：

:windows=5

•temp1="wind。ws”

•?type(“templ")C

:?type(tempi)N

:?type(“2+3”)N

•?type(".t・”)L

s?type(“{09/09/99}”)D

Visualfoxpro讲义第五章

,0^＞\^0\^0f1^0.

・2库文件头测试函数

Z格式:bof（卜工作区号＞1＜别名＞］）

:功能:测试指定的或当前的工作区的记录

P指针是否指向数据库文件头.若是，函

}数返回值为真，否则为假.若

;〈工作区号〉和〈别名〉都不选时，默认

B为当前工作区

.Visualfoxpro讲义第五章

.\^0\^0f1^0.

«例子：

susexsda

:?bof().f.

gotop

?bof()

skip-4

?bof().t.

?recno()1（解释原因）

Visualfoxpro讲义第五章

\^0\^0f1^0.

3库文件尾测试函数eof()

格式:eof(卜工作区号＞|〈别名刁)

功能：测试指定的或当前的工作区的记录

指针是否指向数据库文件尾.若是，函

数返回值为真，否则为假.若

〈工作区号＞和＜别名＞都不选时，默认

为当前工作区

•Visualfoxpro讲义第五章

.\^0\^0/^0：

:例子：

•usexsda

*

9?eof().f.

,

.gobottom

:?eof().f.

命list|skip

•?eof().t.

?recno()n+l（解释原因）

♦Visualfoxpro讲义第五章

,\^0\^0f1^0.

:4记录号测试函数recno()

:格式：recno(卜工作区号＞|＜别名＞])

♦功能：测试指定工作区中的当前记录号，并

:返回这个记录号.

?recno()

.Visualfoxpro讲义第五章

,\^0\^0f1^0.

•5条件函数iif()

:格式:iif(〈逻辑表达式〉，〈表达式1〉,〈表达式2＞)

: