vfp函数小结Word下载.docx
- 文档编号:19541026
- 上传时间:2023-01-07
- 格式:DOCX
- 页数:25
- 大小:30.17KB
vfp函数小结Word下载.docx
《vfp函数小结Word下载.docx》由会员分享,可在线阅读,更多相关《vfp函数小结Word下载.docx(25页珍藏版)》请在冰豆网上搜索。
INT(12.5)&
显示12
INT(6.25*2)&
INT(-12.5)&
显示-12
Store-12.5tonNumber
INT(nNumber)&
MOD()
求一个数值表达式除以另一个数值表达式得到的余数
MOD(nDividend,
nDivisor)
nDividend:
被除数表达式,nDividend中的小数位数决定了返回值中的小数位
nDivisor:
除数表达式,若nDivisor为正数,返回值为正;
若nDivisor为负数,返回值为负
MOD(36,10)&
显示6
MOD((4*9),(81/9))&
显示0
MOD(25.250,5.0)&
显示0.250
MOD(23,-5)&
显示-2
MOD(-23,-5)&
显示-3
MOD(-23,5)&
显示2
ROUND()
求圆整到指定小数位的数值表达式的值,即从该位四舍五入
ROUND(nExpression,nDecimalPlaces)
nDecimalPlaces:
小数位数
如果小数位数nDecimalPlaces为负数,则返回结果在小数点左端包含nDecimalPlaces个0
Setdecimalsto4&
小数位为4位
Setfixedon&
小数位是否固定,默认是不固定的
ROUND(1234.1962,3)&
显示1234.1960
ROUND(1234.1962,2)&
显示1234.2000
ROUND(1234.1962,0)&
显示1234.0000
ROUND(1234.1962,-1)&
显示1230.0000
ROUND(1234.1962,-2)&
显示1200.0000
ROUND(1234.1962,-3)&
显示1000.0000
ROUND(1546.1962,-3)&
显示2000.0000
SQRT()
求数值表达式的值的平方根
SQRT(nExpression)
数值表达式,nExpression不能是负值
SQRT(4)&
显示2.0000
Setdecimalsto4
SQRT
(2)&
显示1.4142
Setdecimalsto2
显示1.41
RAND()
得到一个0~1之间的随机数
无
RAND()&
显示一个0~1的随机数
Setdecimalsto6&
小数位6位
10+INT(90*rand())&
显示一个10~100的随机数
a=20
b=100
a+INT((b-a)*rand())&
显示一个a~b的随机数
ALLTRIM()
求删除前后空格后的字符串
ALLTRIM(cExpression)
cExpression:
字符表达式
字符型
cVar=”VFP”
ALLTRIM(cVar)&
显示VFP
TRIM()
求删除全部后缀空格后的字符串
TRIM(cExpression)
TRIM(cVar)&
显示VFP
LEN()
求字符表达式的值中字符的数目
LEN(cExpression)
cVar=”VFP”
LEN(cVar)&
显示3
LEN(cVar+’123’)&
显示8
LEN(“VFP是简写”)&
显示9
显示10
LEN(TRIM(cVar))&
AT()
求一个字符表达式在另一个字符表达式中首次出现的位置(从最左边开始计数)
AT(cSerachExpresion,cExpressionSearched[,nOccurrence])
cSerachExpresion:
指定搜索表达式
cExpressionSearched:
指定被搜索表达式
nOccurrence:
数值表达式指定第几次出现,缺省时为1
注:
如果没有搜索到,AT()函数的返回值为0
AT()函数区分搜索字符的大小写。
如果不区别搜索字符的大小写,可使用ATC()函数
Store‘Nowisthetimeforallgoodmen’togcString
Store‘isthe’togcFindString
AT(gcFindString,gcString)&
显示5
Store‘IS’togcFindString
AT(gcFindString,gcString)&
ATC(gcFindString,gcString)&
SUBSTR()
得到一个给定字符表达式的子字符串
SUBSTR(cExpression,nStartPosition[,nCharactersReturned])
指定要从中返回字符串的字符表达式
nStartPosition:
指定返回的字符串在字符表达式中的位置
nCharactersReturned:
指定返回的字符数目,缺省时返回字符表达式的值结束前的全部字符
Store‘abcdefghijklm’tomystring
SUBSTR(mystring,1,5)&
显示abcde
SUBSTR(mystring,6,2)&
显示fg
SUBSTR(mystring,6)&
显示fghijklm
SUBSTR(mystring,12,3)&
显示lm
aa=”三江学院”
SUBSTR(aa,5,4)&
显示学院
LEFT()
从字符表达式最左边一个字符开始返回指定数目的字符
LEFT(cExpression,nExpression)
指定数目(数值表达式)
LEFT(‘Redmond,WA’,7)&
显示Redmond
RIGHT()
从字符表达式最右边一个字符开始返回指定数目的字符
RIGHT(cExpression,nExpression)
RIGHT(‘Redmond,WA’,7)&
显示ond,WA
SPACE()
得到指定数目的空格组成的字符串
SPACE(nExpression)
SPACE(10)&
显示10个空格
LEN(SPACE(10))&
”123”+Space(3)+”321”&
显示123321
DATE()
得到操作系统控制的当前系统日期
日期型
date()
time()
datetime()
dt=datetime()
dt
sr={^1982/12/4}
date()-sr&
显示今天距1982-12-4多少天
sr={^2009/12/4}
sr-date()&
显示今天距2009-12-4多少天
setcenturyoff
date()
setcenturyon
setdatetolong
setdatetoansi
DATETIME()
得到的当前的系统日期和时间
日期时间型
tNewyear={^2010/01/0112:
00am}
tToday=datetime()
nSeconds=tNewyear-tToday&
距新年多少秒
clear
”Thereare”+ALLTRIM(STR(nSeconds))+”secondstotheNewYear.”
DOW()
得到该日期是一周的第几天(第一天为星期日)
DOW(dExpression|tExpression)
dExpression:
日期表达式
tExpression:
日期时间表达式
DOW(date())
DOW({^1982-12-04})&
显示7
DAY()
得到该日期是某月中的第几天
DAY(dExpression|tExpression)
Store{^1995/3/5}togdBDate
DAY(gdBDate)&
’Thatdateis’,MONTH(gdBDate),STR(DAY(gdBDate),2)
MONTH()
得到该日期的月份值
MONTH(dExpression|tExpression)
Month(date())
Store{^1995/3/5}togdBuy
storemonth(gdBuy+31)togdMonth
gdMonth&
显示4
YEAR()
得到该日期的年份值
YEAR(dExpression|tExpression)
返回的是带世纪数的年份,如2008
setcencury的设置不影响返回值
Year(date())&
显示2009
TIME()
以24小时制、8位字符串格式(hh:
mm:
ss)返回当前系统时间
ASC()
得到字符表达式中最左边字符的ASCII码值
ASC(cExpression)
ASC(‘ABCD’)&
显示65
ASC(‘8’)&
显示56
CHR()
计算数值表达式的值,以该值为ASCII代码返回其对应的字符
CHR(nExpression)
CHR(66)&
显示B
CHR(65)&
显示A
CHR(57)&
CHR(1000)&
报错
VAL()
返回由数字表达式组成的字符表达式的值
VAL(cExpression)
从左到右返回字符表达式中的数字,直至遇到非数值型字符(忽略前面的空格)时为止。
若字符表达式的第一个字符不是数字,也不是加、减号,则VAL()函数返回0
Store‘12’toa
Store‘13’tob
a+b&
显示1213
val(a)+val(b)&
显示25
Store‘1.25E3’toc
2*val(c)&
显示2500
val(‘aaa’)&
val(‘2aaa’)&
val(‘234aaaa’)&
显示234
DTOC()
转换日期型或日期时间型到字符型数据
DTOC(dExpression|tExpression[,1])
1:
以年月日顺序且无分隔符的形式返回字符型日期
2:
指定仅返回含时间部分的字符型时间
Store{^1995/10/3110:
34}togdThisDate
DTOC(gdThisDate)&
显示1995.10.31
DTOC(gdThisDate,1)&
显示19951031
TTOC(gdThisDate)&
显示1995.10.3110:
34:
00AM
TTOC(gdThisDate,1)&
显示199********400
TTOC(gdThisDate,2)&
显示10:
date()&
显示2009年7月8日星期三
DTOC(date())&
DTOC(date(),1)&
显示20090708
TTOC()
转换日期时间型到字符型数据
TTOC(tExpression[,1|2])
CTOD()
转换字符表达式到日期型数据
CTOD(cExpression)
日期型(格式:
mm/dd/yy)
StoreCTOD('
1776/5/4'
)togcthe_4th
gcthe_4th&
显示1776年5月4日星期六
StoreCTOD(‘^2101/12/15’)togd
gd&
显示2101年12月15日星期四
StoreCTOT('
1776/7/410:
22'
)togcthe
gcthe&
显示1776年7月4日星期四,10:
22:
00
StoreCTOT(‘^2001-10-1222:
22’)togd
显示2001年10月12日星期五,22:
CTOT()
转换字符表达式到日期时间型数据
CTOT(cExpression)
STR()
转换数值表达式成字符串
STR(nExpression[,nLength[,nDecimalPlaces]])
nLength:
指定返回的字符串长度,缺省时默认宽度为10
小数位数,缺省时宽度为0
若nLength大于整个数值的宽度,则用前导空格填充返回的字符串;
若nLength小于整数部分的数字位数,则返回一串星号,表示数值溢出
STR(314.15)&
显示314
STR(314.15,5)&
STR(314.15,5,2)&
显示314.2
STR(314.15,2)&
显示**
STR(1234567890123)&
显示1.234E+12
X=123
Y=321
str(X)+str(Y)&
显示123321
BETWEEN()
判断一个表达式的值是否在另外两个相同数据类型的表达式的值之间
BETWEEN(eTestValue,eLowValue,eHighValue)
eTestValue:
测试值
eLowValue:
范围的下界
eHighValue:
范围的上界
逻辑型或Null值
若是就返回.T.
若不是就返回.F.
若eLowValue或eHighValue为NULL值,则返回NULL值
Between(3,14,15)&
显示.F.
Between(‘a’,’A’,’b’)&
Between(‘A’,’a’,’P’)&
Between(date(),{^2001/12/15},{^2101/12/15})&
INKEY()
返回一个键码值,该值对应键盘缓冲区中第一个按键操作
INKEY([nSeconds])
nSeconds:
对键击的等待时间
缺省时INKEY()函数立即返回一次键击的值,为0时一直等到有键击为止
若没有按下键,返回0
否则返回第一个输入到缓冲区的键的值(ASCII码)
INKEY(20)&
等待20s返回按下键的ascii值
TYPE()
计算字符表达式,并返回其内容的数据类型
TYPE(cExpression)
表达式必须用引号
如N、D、L等
U表示不确定的类型
TYPE(‘(12*3)+4’)&
显示N
TYPE(‘date()’)&
显示D
TYPE(‘.F.OR.T.’)&
显示L
TYPE(‘ANSWER=42’)&
显示U
ANSWER=3
IIF()
根据逻辑表达式的值返回两个值中的一个
IIF(lExpression,eExpression1,eExpression2)
lExpression:
逻辑表达式
注:
当条件lExpression为真时返回eExpression1的值,否则返回eExpression2的值
字符型、数字型、货币型、日期型或日期时间型
IIF(date()={^2008/12/4},’今天是我的生日’,’今天不是我的生日’)
IIF(dow(date())=1ORdow(date())=7,’今天休息’,’今天上班’)
IIF(day(date())=1,’今天可能是元旦’,’今天一定不是元旦’)
DISKSPACE()
返回默认磁盘驱动器上可用的字节数
setdefaulttoC:
diskspace()
diskspace()/1024/1024
FILE()
测试辅助存储器上是否存在指定文件
FILE(cFileName)
cFileName:
指定要查找文件的名称,必须包含文件的扩展名
逻辑型
若文件存在返回.T.
若文件不存在则返回.F.
FILE(‘c:
\config.sys’)&
MESSAGEBOX()
其缩写是MESSAGEB()
显示一个用户自定义的对话框
MESSAGEBOX(cMessageText[,nDialogBoxType[,cTitleBarText]])
cMessageText:
指定对话框中显示的文本,若表达式中包含回车符以CHR(13)表示
nDialogBoxType:
数值表达式(缺省时为0),指定对话框中的按钮,图标,显示对话框的默认按钮及对话框的行为
cTitleBarText:
指定对话框的标题,缺省时是”MicrosoftVisualFoxPro”
返回选取对话框中哪个按钮的对应值,如书中P57表2-9所示
cMessageTitle=‘我的应用程序’
cMessageText=‘目前软驱中无软盘,是否重试?
’
nDialogType=4+32+256
nAnswer=MESSAGEBOX(cMessageText,ndialogType,cMessageTitle)
GETFILE()
显示“打开”对话框,返回选定文件的名称
GETFILE([cFilename][,cText])
cFilename:
指定没有选择“所有文件”菜单项时,可滚动列表中显示的文件扩展名
cText:
指定文件文本框前的标签
gc=GETFILE(‘*’,’输入文件名’)
gc
gcT=GETFILE(‘dbf’,’表文件名’)
gcT
SELECT()
测试工作区号
SELECT([0|1|cTableAlias])
0:
用于返回当前工作区号
用于返回当前未被使用的最大工作区号
cTableAlias:
指定表别名,用于返回该表所在的工作区号
closedatabases
select0
usexs&
打开xs表
usecj&
打开成绩表
select()&
select(0)&
select
(1)&
显示32767
USED()
测试一张表的别名是否已被使用
USED([nWorkArea|cTableAlias])
nWorkArea:
工作区号
别名
若工作区号和别名缺省,表示当前工作区
selecta
selectb
打开cj表
selectc
usekc&
打开课程表
used('
a'
)&
used(4)&
cj'
select7
used()&
显示.F.(7号工作区无表打开)
FIELD()
返回已打开表的指定序号的字段名
FIELD(nFieldNumber[,nWorkArea|cTableAlias]
nFieldNumber:
指表结构建立时的字段顺序号,第一个字段的序号为1
usexs
FIELD
(1)&
显示第一个字段名xh
FIELD
(2)&
显示第二个字段名xm
FIELD(3)&
显示第三个字段名xb
FCOUNT()
返回已打开表的字段数目
FCOUNT([nWo
- 配套讲稿:
如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。
- 特殊限制:
部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。
- 关 键 词:
- vfp 函数 小结