EXCELVBA函数参考手册

习函数参考手册摘年12月日Ex习料......................................................................................................................函1数1参1考1手1册1摘Ex帮助...............................................................................................................12006年12月数1Abs函..........................................................................................................................................导出数学函...............................................................................................................................6Array函.......................................................................................................................................Asc函..........................................................................................................................................Atn函数9CallBy函数9CBool等类型转换函.................................................................................................................语返回类........................................................................................................................................说11函数...................................................................................................................................13Chr函数.........................................................................................................................................Command函函数数.CurDir函...................................................................................................................................CVErr函数19函.......................................................................................................................................20函................................................................................................................................20DateDiff数................................................................................................................................DatePart数函..............................................................................................................................DateValu函数........................................................................................................................................27DDB数27Dir函28oEv函...............................................................................................................................30函31EOF函32数......................................................................................................................................33p函数33ileAttr函34数34第2页FileLen函数..................................................................................................................................Filter函数Fix、Int函数36Format数37函数40FormatDateTime函数....................................................................................................................41FormatNumber函.......................................................................................................................FormatPercent函数........................................................................................................................FreeFile函数43FV函数GetAllSettings函.......................................................................................................................45函数..................................................................................................................................46GetObject函数GetSetting函数.............................................................................................................................51函数Hour函数......................................................................................................................................IIf函数...........................................................................................................................................数..............................................................................................................................53Input函数54InputBox函数...............................................................................................................................函数.......................................................................................................................................57数.................................................................................................................................58函数IRR函........................................................................................................................................61IsArray函数IsDate数IsEmpty数.................................................................................................................................63函数64函ll函.....................................................................................................................................65IsNumeric函..............................................................................................................................66函.................................................................................................................................67函数67nd函数.................................................................................................................................LCase函数Left函........................................................................................................................................函数........................................................................................................................................70函数........................................................................................................................................71LOF函数.......................................................................................................................................Log数........................................................................................................................................、与Trim函数MacID函数...................................................................................................................................73函函........................................................................................................................................第3页Minute数76MIRR函Month函数函...........................................................................................................................78sgBox函78函数NPer函......................................................................................................................................NPV函.......................................................................................................................................函数artition函数函函......................................................................................................................................PV数89函数90Rate函函92RGB函......................................................................................................................................Right函数Rnd函数........................................................................................................................................ound函96econd数97函函........................................................................................................................................Shell函......................................................................................................................................数SLN数Space函102Spc函.102函103Sqr函函数函105StrConv函...............................................................................................................................106StrReverse函107String函数................................................................................................................................108数.................................................................................................................................SYD函函数110函数函函数函数...........................................................................................................................113TypeName函114第4页函...............................................................................................................................115UCase函116函arType函数..............................................................................................................................117eekday函118WeekdayName函119Year函数120第5页Abs数返回参数的绝对值，其类和参数相同。语法Abs(number必要的参数是任何有效的数值表达式，如果包含，返回，果是初始的变，则回。说明一个数的绝对值是将正负去掉以后的值ABS(-1)和都返回。Abs例用函数计算数的绝对值。DimMyNumberMyNumber=Abs(50.3)'返回。MyNumber=Abs(-50.3)'返回。请参阅：函学数中的函数函数函数函Int函、Log数、Sgn函数、函、函、函数导的学数：数以下非基本数学函数的列表，皆可由基本数学数导出：函数

由本函数导出之式Secant（正割Sec(X)=Cos(X)余）Cosec(X)=1/Sin(X)Cotangent余切）Cotan(X)=1Tan(X)InverseSine（反）Arcsin(X)Atn(X/X+1))InverseCosine（反余

Arccos(X)=Atn(-X/Sqr(-X*1))+2Atn(1)弦InverseSecant（反正=Atn(X/Sqr(X*Sgn((X)-1)*(2*割InverseCosecant（余割）

Atn(1))Arccosec(X)=Atn(XSqr(X*1))+(Sgn(X)-1)*(2*Atn(1))Inverse反Arccotan(X)=Atn(X)+2*Atn(1)余切）Hyperbolic双HSin(X)=(Exp(X)-2正）第6页Cosine（双=(Exp(X)+Exp(-X))/2曲余）HyperbolicTangent双=(Exp(X)-Exp(-X))(Exp(X)+Exp(-X))曲正）Secant（双=2(Exp(X)+曲正）Hyperbolic双=2/(Exp(X)Exp(-X))曲余）HyperbolicCotangent

HCotan(X)=(Exp(X)+Exp(-X))(Exp(X)-（双曲切）InverseHyperbolicHArcsin(X)=Log(X+Sqr(X*+1))Sine反双曲正弦）InverseHyperbolicHArccos(X)=Log(X+Sqr(X*-1))Cosine反余）InverseHyperbolicHArctan(X)Log((1+X)(1X))/2Tangent反正）InverseHyperbolicHArcsec(X)Log((Sqr(-XX+1)1)/X)Secant反正）InverseHyperbolicCosecantInverseHyperbolic

HArccosec(X)=Log((Sgn(X)*Sqr(X+1)+1)/X)HArccotan(X)=Log((X1)-1))/2Cotangent反余切）以为底的对数=Log(X)/Log(N)Array函返回一个包含数组的。语法Array(arglist)所需的参数是一个用逗号隔开的值表些用于给所包含为的数。说明用来表示数组元素的符号变量名、圆括号以及括号中的所需元素的索引号组成。在下面的示例中，第条语句创建一个Variant量二条语将一个组赋变量后条语句将组第二元素的值赋给另个变量。第页DimAAsVariant=Array(10,20,30)=A(2)使用函数创的数组下界受Base语句指定的下界的决定除非是由类型库（如)限则受。注意为数组明的也可表示数了长度固的字符以及用户义类型外变量可以表示任何型的数组尽一个包含数组的和一元素为类型的数组概念上有所不同数组元素的访方式是相同的。例该示例使用函数来返回一个包含。='为用Base'。=为。=为。Asc函返回一个，代表字符串中首字母的字符代码。语法)必要的参数可以是任何有效的字符串表达式如果中没有包含任何字符，则会产生运行时错误。说明在非系统下返回值范围为–在系统下则为32767。注意函数作用于包在字符串中的字节数据，返回第一个字节的字符代码而非字的字符代码AscW函返回字符代码若平不支持Unicode，与功。Asc例本示例使用函数返回字串首字母的符值（ASCII值）。DimMyNumberMyNumberAsc("A")'返回。MyNumberAsc("a")'返回。MyNumberAsc("Apple")'返回。第页Atn函返回一个，指定一个数的反正切值。语法)必要的参数是一个或任何有效的数值表达式。说明Atn函参值为直三角形边的比值返回弧度单位的角。个比是角的对边长度除以角邻边长度商。值的围在和pi/2弧之间。为了角度转为弧，请将度乘以pi/180。为了将弧度换为角，请将弧度以180/pi。注意Atn是Tan的反三角函数Tan参值为角返回直角三角形的两条边比。不要Atn和余函混余函是函倒，=(1/tangent)。Atn函示本示例使用函数计算圆周率。Dimpipi=4*'计算圆周率。函执行一个对象的方法，或设置或返回一个对象的属性。语法object,procname,)函数的语法以下命名数：部分objectargs()

描述必；变体（对）函数将要行的对象的称。必；体（符串）一个包含该象的属性名或者方法名称的字符串表达。必；数。一个类的常，代正在被调用的过程的类型。可：变体型（数组）。说明函用属或字称方第页使用CallByName来设置一个文本的第二行到第三用方法移动本框：CallByName"MousePointer",vbCrosshairResultCallByName"MousePointer",CallByName"Move",vbMethod,100,100等函每个函数都可以强制将一表达式转换成某种特定数据类型。语法))CCur())expression)))expression))必要的参数可以是任何字符表达式或数值表达式。返型名决返型，如下所：函数型

参数范围CBool

任字。Byte0至255。Currency-922,337,203,685,477.5808至922,337,203,685,477.5807。DoubleDecimal

任日。负从至-4.94065645841247E-324；从4.94065645841247E-3241.79769313486232E308。零即位为+/-79,228,162,514,264,337,593,543,950,33528位的数范+/-7.9228162514264337593543950335能是0.0000000000000000000000000001。Integer-32,768至32,767，小数部入。-2,147,483,648至2,147,483,647，小部分四入第页SingleStringVariant

为-3.402823E38至；正为1.401298E-45至3.402823E38。据回。值，与相同；不为数，则范围与相同。说明如果传递给函数的超转换目标数据类型的范围，将发生错误。通常在编码时可以使用数据类转换函数现某些操作的结果应该表示为特定的数据类型，而是缺省的数据类。例如，当单精度双精度或整数运算发生的情况下，使用来强制执行货币运算。应该使用数据类型转换函来代替使国际版的数据转可以从一种据类型转换为另一种。例如，当使用时，同的小数点分隔符、千分位分隔符各种货币选项，依据系统的区域设置都会被妥善识别。当数部分恰好为时，和函数会将它转换为最接近的偶数值。例如转换为转换为和于和Int函数，Fix会将小数部分截断而不是四入。且和函数总回与的数据类相同。使用函数可判断是否被或Cdate来识和以及一数整部小部从。CDate依据系统的区域设置来定日期的果的为可识别的期设置则不正判断、、日。另，日期，若的字符，不被。CVDate函数期版的函数与函数是相同的不过，CVDate是返回一个它的类型是的类型为现在正的类以。一为值一个将的。函数不回的数类型总是返回个它的值为。CBol例示例使用函数来将一转成值果表结果值，回否则回。B,A=B=5'设。第页==B)'为。A=0'定义='的为。CByte函数示本示例使用CByte函数将表达式转成MyDouble,MyDouble=125.5678'MyDouble为（双度）=CByte(MyDouble)'值为CCur函数示例本示例CCur函数将表达式转成。MyCurr='为类型=*'将MyDouble*2的结'（1086.429176为（1086.4292CDate函例本示例函数将符串转换成一般说来符串格式的日期与时间硬编（如示例所示并不好较好的做法是使用日期原义表达式和时间的原义表达式（如#2/12/1969#，#4:45:23）。DimMyDate,MyShortDate,MyTime,MyShortTimeMyDate"February1969"'定义日期。MyShortDateCDate(MyDate)'转换为数据类型。MyTime"4:35:47'定义时间。MyShortTimeCDate(MyTime)'转换为数据类型。CDbl函本示例CDbl函数将表达式转换为类=CCur(234.456784)'为类型=CDbl(MyCurr*8.2*'将转换为类CDec函示该示例用函数将数字值转换为。Dim='是货='MyDecimal二进制数。CInt函例本示例CInt函数将一数值转换为。Dim='为类型='的值为。第页CLng例本示例使用函数将一数值转为。MyVal2,MyLong2MyVal1=MyVal2='、MyVal2均为类。MyLong1=CLng(MyVal1)'MyLong1的值为。MyLong2=CLng(MyVal2)'MyLong2的值为。CSng例本示例使用函数将一数值转为。'MyDouble1、MyDouble2均为类型。==='MySingle1的值为。='MySingle2的值为。CStr示例本示用函数将一数值转为。MyString=437.324'为类型。='的。函数示例本示用函数将表达式转为。Dim='为类型。=&'的内容为字符串4534000”。函从参数列表中选择并返回个值。语法,choice-1[,choice-2,[,choice-n]])Choose函数的法具有以下个部分：部分choice说明

描述必要数数表式字段它运结是个值，界于1和可择项数间。必要数，Variant表式，含选项的中一。第页index11index22index3choice-1="one""two"choice-3="three""three"1NullChooseChooseIndunctionGetChoice(IndAsInteger)etChoiceChoose(Ind,"Speedy","United","Federal")EndFunctionChr函String)charcodeLong说明0间标准非打印charcode正常0–255系统实际范围-3276865535节总单节两节ChrWUnicode若持平台上

同持Unicode串因12865,535范围n)WindowsUnicodeUnicoden127n)

因ChrWChrDimMyChar='回。='回。='回。='回。Command返回命令行的参数部分命令用于装入VisualBasic或Basic开发可执行程序Basic在Office应用程序中可用。语法说明当从命令行装入时，/cmd后的命令行的任何部分作为命令行的参数传递给程序。下面示例中表函数回的参数信。VB/cmdcmdlineargs对于用Basic发并译为文件应用序出：于“”帮。Co例本示例在某个函数中用函数获得令行参数，并命令行参数以类型之数组返。在中不用。FunctionGetCommandLine(OptionalMaxArgs)'明变量。DimC,CmdLine,CmdLnLen,InArg,NumArgs'查是否提供了MaxArgs参数。IfIsMissing(MaxArgs)ThenMaxArgs=10'使数组的大小合适。ReDimArgArray(MaxArgs)NumArgs0:InArgFalse'得命令行参数。CmdLineCommand()CmdLnLenLen(CmdLine)'一次一个字符的方式取出命令参数。ForI=1ToCmdLnLenC=Mid(CmdLine,I,1)第页测是为或。If""AndC若是键，是则参If新检测参是过If==+1=将=&C找或。将。=I'调ArgArray(NumArgs)'将=Cos函返回一个指定一角的余值。语法)必要的number参数一Double或何有效的数值表达式示个以弧度为单位的角。说明Cos函数的数为一个角并返回直角三角形两边的比值该比值为角的邻边长度除以斜边长度之商。结果的取值范围在-1到1之间。为了将角转换成度，请将角度乘以pi/180。为了弧度转换成角度，请弧度乘以180/pi。第页Cos函数例本示用函数计算一个角余弦。DimMyAngle,MySecantMyAngle='定义角度以“弧度为单位。MySecant=/Cos(MyAngle)'利用余计算正sec()）。函创建并返回一个对的引用。语法class,[servername])函数的语法有如下部分：部分servername

描述必需的；要创的应用程序名称类。可选的；要其上创建对的网络服器名称如果servername是一个字符串"")即使用地机器。class参数使用.objecttype种语法，包以下部分部分

描述必需的；Variant（字。提供该象的应用程名。objecttype必需的字）。待创建象的类型或类。说明每个支持自动化的应用程都至少提供一种对象类型如一个字理应用程序可能提供对，Document对及Toolbar对。要对象返回的对象赋给一个象变量：'声明一个象变量来存放该对象'的引用。DimasObject采用后期绑定方式。DimExcelSheetObjectSetExcelSheetCreateObject("Excel.Sheet")上述代码启动该应用程序创建对象，在本例中是创建一个Excel子数据表对象创建后就可以在代码中使用自义的对象变量来用该对象在下面的示例中可以使用象变量ExcelSheet来访问建对象的属性和方法以及访问MicrosoftExcel的其它对象，包括应程序对象和单元格集合。'设置Application对使可见ExcelSheet.Application.Visible=True第页'些文本ExcelSheet.Application.Cells(1,=row'到C:\test.xls目录CreateObject函示例该示使用CreateObject对Excel引用(xlApp)。它使用该引用来访问Excel的属性并使用Microsoft的方法将其关闭，最再释放该引用。DimxlAppAsObject'定义存放引用象的变量。SetxlApp=CreateObject("excel.application")'如果要让该应用程可见，则需将属性设为。xlApp.VisibleTrue'可以使用访问Excel的'其它对象。xlApp.Quit'成时，调用方法关闭SetxlApp=Nothing'该应用程序，后释放该引。CurDir函返回一个，用来代当前的径。语法drive)]可选的参数是一个符串表达，它指定一个存在的驱动器。如果没有指定驱动器或是零长度字符串则会返回当前驱动器的路径。在Macintosh上，忽略任指定的,并只单地回当前驱器的径。函数例本示用函数来返回当前的路径在Macintosh中，用CurDir。是并且部反斜。定的件替。'假设驱“C:\WINDOWS\SYSTEM”(在Windows中)。'假设驱“D:\EXCEL。'假设为前驱器。='返回“C:\WINDOWS\SYSTEM”。='返回“C:\WINDOWS\SYSTEM”。第页='回“D:\EXCEL”一Variant，用来代当前的径。语法drive)]可选的drive参是一个字符串表达式，它指定一个存在的驱动器。如果没有指定驱动器或drive零长度字符串("")则会返回当前驱动器的路径。在Macintosh上，忽略任指定的drive,并只简单返回当前驱器的径。CVErr函返回子类型Variant，其中包含指定的误号。语法CVErr()必要的errornumber参数可以是何有效的错误号代码。说明可以在过程中，使用函函它且正常一则可入确如果不此所要在CVErr可以返回个错误号并告知应该取的行动。注意，Error的隐式转是不允许的，例如，不能直接把的返回值值给一非的变量然而可对的返回值行显式转（用、CDbl等给适当的数据类型变量。CVErr函数示例本示例函数返回一类型的值，其为(10)。的CalculateDouble会错。返回来变行错。函数可用来返值是代表错误。'用CalculateDouble，传入一会错误的参数。SubTest()ebug.PrintCalculateDouble("345.45robert")ndSub'定义CalculateDouble函过程。FunctionCalculateDouble(Number)IfIsNumeric(Number)ThenCalculateDouble=Number2'返回果。ElseCalculateDouble=CVErr(2001)'返回一定义错误码。第页函返回包含系统日期的(Date)。语法说明为了设置系统日期，请使语句。Dat函例本示例Date函数返回统当前的日。DimMyDateMyDate=Date'MyDate值为系统当的日期。DateAdd返回包含一个日期的(Date)，一日期还加上了一时间间隔。语法)函数语法中下列命名参数：部分

描述必时必时数数））必(Date)表示日的文字，这一日期还加上了时间间隔。设置参数具有以下设定值：设置

描述

设置

描述qmy

年w季月h一年的日数n第页

一周的日数周时分钟d

日s

秒说明可以使用间用来计算距今为三十天日期或计算距现为钟的时间为了对加上“日”可以用“年的日数”“y“日”(”d”)或“一的日数”(”w”)。函数将不返有效日期。在以下实例中将1月31日加上一个月：DateAdd(m,31-Jan-95)上例中返回2月28日而不年2月日如果年1月31日由于1996年是闰年值是1996年2月29。如果计算的日期超前年（减的年度超过中的年份，就会致错误发生。如果Long则取整值。注意返回值格式由Panel设而到数的式决定。DateAdd数示例本示先得一期，再用函数示未来数后的日期。DimFirstDateDate'声明变量。DimIntervalTypeAsStringDimNumberIntegerDimMsgIntervalType="m"'"m"定以“月”作为间隔。FirstDate=InputBox("Enteradate")NumberInputBox("Enternumberofmonthstoadd")Msg=date:"&DateAdd(IntervalType,Number,FirstDate)MsgBoxMsg函返回(Long)的值，表示两个指定日期间的时间。语法date1,[,[,]])函数语中有下列命参数：部分

描述要。字符串表达，表示用来计算和时差间隔第页□date2Firstdayofweekfirstweekofyear

必；(Date)。计要用两个期。可指定一个星期的第一天的常数如果予定则以星期为一天。可指定一年的一周的常如果未指则以包1月1日的星期一周。设置参数的设定值如下：设置

描述

设置

描述qmyd

年w季月h一年的日数n日s

一周的日数周时分钟秒firstdayofweek数的设定值如下常数01234567

值

描述使设星星星星星星星常数

值

描述0

用API设置第页123

含月日。。。说明间使用来计算从今个。算与“”(y)或“”(d)“一周的日”(w)时DateDiff返回两日间的周数如果date1星期一，DateDiff计算到止的星一的个数。这个数含但不包含。不，如果“周”(ww)，则返“历”由算与星而果好是期日，则也会加进DateDiff结是否为星期日都不将它算去。如果来得晚则函返负。firstdayofweek数会影响用时间”或”计的结果。如果date1或日期文字定的年份成该日期的定部分是，如果date1或双引号("")括来，且年份而不提，在每次计算表达式或时当前年份会插入到码之中这样就可书写适用于不年份的程序码。在计算月日来年的月日的年差时DateDiff返1表相份而。DateDiff函示例本示使用函数。Date'声。=a=fromtoday:"&Now,Msg函返回一个包含已知日期的定时间部分的Verval,[,firstdayofweek[,firstweekofyear]])函数中参数第页部分Firstdayofweekfirstweekofyear

描述。返。计值。可指定一个星期的第一天的常数如果予定则以星期为一天。可指定一年一周的常数如果未予指定则以包含1月1日的星期一周。设置参数的设定值如下：设置

描述yyyyqmyd

年w季ww月h一年的日n日s

一周的日数周时分钟秒firstdayofweek数的设定值如下常数01234567

值

描述使设星星星星星星星第页firstweekofyear参数的设定值如下：常数

值

描述0123

用API。含月日。。。说明间用DatePart计算某个日期是期几或目前为几点钟。firstdayofweek数会影响用时间号“W或”计的结果。如果date是日期文字指定的年份为该日期的定部分但是如果date用双引号括起，且年份而不提，在每次计算表达式时，当前年份都插入到代码中。这样可以书写适于不同年的程序代码。DatePart数示例本示先取得个日期后使用显发该哪季。Date'声明变。=a="&Msg函返回包含指定的年、月、的Variant(Date)。语法,month,)函数语法有列的命名数：部分month

描述必；Integer。从9999间的数，或一数值表达式。必；Integer任何值表式。必；Integer任何值表式。说明第页如年月日函数中每个参数的取值围应该可接受的即日的取值范围应在之间而月的取值范围应在之间但是，一个数值表达式表示某日之前或其的年、、日数时，也可以为每个使用这个数值表达式的参数定相对期。以下示例中使用了数值表达式代替绝对日期。里DateSerial函数回年月日的十年-10)零个月-又一天-之前的日期；句话说，就是年月。DateSerial(1990-10,8-2,11)数的值若介于与之间，则将其解释为年若介于30和99间则解释为–1999而所有其它参数则请用四位数值表（如）。当任何个参数的取值超出可接受的范围时会适时进位到下一个较大时间单位如，了天这天被释成个加上出日，多出日将由年份月份决如果个数超出-32768到32，的围就会致误生。DateSerial函示例本示例使用函数来将指定年月日转换为类型表达。DimMyDate'MyDate的值为12，1969，类型。MyDate=DateSerial(1969,2,'返。函数返回一个。语法)必要的参数通常是字符串表达式，表示从年月日到9999年月日间的一个日期但是date也可以是任何表达式其所代表的日期、时间在上述范围内。说明如果是一字符串，且其内容只有数字以及分隔数的日期分隔符，则会来识别月、。也识份了之，DateValue也别1991和Dec30,。如果date了年这分就会由系统的份。果参数则DateValue它果（如，则会导致。第页DateValue数例本示使用可以使用日接给或类型的变赋值日期，如=。DimMyDateMyDate=DateValue("February12,1969")'返回日期。Day函返回一个为到之的整数，表示一个月中的某一日。语法)必要的参数可是任何能够表示日期的数表达式字串表达式或它们的组合。如果包含Null，则返回。Day例本示例使用指该几在期会地短格。Dim='。='为。DDB函返回一个，指定笔资产在一特定期间内的折旧。使用双下落收复平衡方法或其它指定的方法进计算。语法,salvage,,period[,factor])DDB函数具有列命名数：部分salvage

描述。Double指定产的初始成本。。指定用年限结束的资产价值。。Double指定资可用的用年限。。Double指定计算产折旧所用的那一期间。选指定收复衡下落时的度如果省略的话（下落方法）为缺值。第页说明双下落收复平衡方法用加利率法计算折旧一段时期旧为最高在接下来的期间内降低。和参数必须用相同的单位表示。例如，如果月份示，则。DDB：旧=((cost–alvage)*factor)/Dir函返回一个以个它与定模或匹。语法pathname[,Dir函数的语法有以下几部分：部分pathname

描述可选参数用来指定文名的字符表达式可能包含录或文件夹、以及动器。如果没有找到pathname，会返回零长度字符串("")。attributes可参数常或值达式其总用来定件性如果省，会回配pathname但包属的件。设值attributes参数设：常数

值

描述0(缺省)指没属文。1248

指无只指无隐指无系在Macintosh中。指卷指了忽在Macintosh中不可用。指无文。指文别只在上。第页

VBAMicrosoft(*)(?)MacintoshMacintoshTEXT::256attributeMacIDDirpathname

pathnameDir

pathnamepathname

("")访问pathname改变新pathname但递归方Dir续地录提示特别储后对排例本示检查或目录存Macintosh计机上默驱动器“HD”路部分冒号反斜线隔开MicrosoftWindowsMac效出现DimMyFile,MyPath,MyName'“WIN.INI(Microsoft)（该存）MyFileDir("C:\WINDOWS\WIN.ini")'带扩展超过*.ini存'按找MyFileDir("C:\WINDOWS\*.ini")'二Dir但带同目录*.ini=Dir'回找式。='示目。='指定路径。='找。Do<>'。'过当。If'用位定代表。If(GetAttr(MyPathMyName)AndvbDirectory)vbDirectory'如果是个录将名显出。IfIf='查找下一个录。函转让控制权，以便让操作统处理其它的事件。语法)说明函数返回个以代表Basic独版本打开的窗体目，如，VisualBasic，业版，在其它的应用程序中，DoEvents返回。DoEvents在SendKeys。程搜件—特长放时给ActiveX部件来完成。后，任务还是完全独立于应用程序，多任务及时间片由操系统来处理。小心以放次返回之前，不能再被其他分的码调用否则不的果如果其它的应用序能本过程以不的操，也不使用时能放弃控制权。第页DoEvents函数例下列例在循环使用每循环成次时将执行让给操作统返回仅主程Basic时，打。'创。I=1To150000'开I1000=0Then'如果一了。OpenForms='将。NextI'将循环器Environ返回，它境在不用语法number})函数的语含有以下这命名参数：部分envstring

描述可。境可参。值达式用来表示境符串在环字串格中的值序参数可值不计前它。说明如果在环境字符串表格中找到envstring会。如则会文指envstring的，也境对境(=)后如number，则境相这种会返回整个文本包括envstring如果在定位置上没有环境字串，那么会返回一零长度符串。Environ函数例本示例使用来境中目。在中不。Dim'=1'设置1。='取得境第页IfLeft(EnvString,5)='查项。=Len(Environ("PATH"))'取=="&&"="&=+1'不是，'项，检下项。=If>0'EOF函返回一个Integer包含Boolean值表明已经到达为或打开的文件的结尾。语法)必要的filenumber参数是一个含任何效的文号。说明使用EOF为了避免图在件结处进输入产生错误直到到文件结尾，EOF函数。于访或而Get语句无法读完整的记时，都返回对Binary而打开文件，在EOF函返回之前，试图使用函函二LOF和Loc函函数，者将Get函与EOF函数配使用。对于为Output打开文件，EOF总。EOF函数示例本示例使用函数来检测文件尾。例中假设MYFILE为有数文本行的文本文件。DimInputDataOpen"MYFILE"ForInput#1'为输入打开文。DoWhileNotEOF(1)'检查文件尾。LineInputInputData'读入一行数据。Debug.PrintInputData'在立即窗口中显示。Loop第页'关。Error函返回对应于已知错误号的误信息。语法Error[(这个可选的参可以为任何有效的错误号果是有效的错误号，但尚未被定义，则“用误或象”果不会发生省errornumber就与消如果没发或者errornumber是则Error返回一个长度为零的字符串。说明请检查象属便最函数的返值于对象的属性。Error函数示本示例用Error函来代所。DimFor=To64'从错误代号循环到64。'在。Exp函返回，指定底某。语法)必要的参数是或任何有效的数值表达式。说明如果的值过709.782712893则会导致错误发。常数的值约是。注意Exp函数作用和的作用互补，所有时也称做对数。p函示本示例函计算e（e~2.71828）某次方。DimMyAngle,MyHSin'定角度（以“弧度”为单位）。MyAngle=1.3'计双曲正弦函数值（）。第页=-*/2函返回一个，示使用语句所打开件的文件方。语法filenumber,)函数的语法具有下几个命名数：部分filenumberreturntype

描述必。类，任的文件号。必Integer型是数字出回信息的类型定1则可返回个代表文件方式的数值而仅在16系统中，定2才可以复操作系统的文件句柄。在32位统中不支持2，它会导致错误发生。值当参数值1时下列返回值指出文件访问方式：方式

值

方式

值1Append8Output2BinaryRandom4FileAttr函示例本例用函数来已模以柄返柄于16位系统在32位系中把2作为二参产=1'指定文号Open'打。Mode='回加件式）=2)'返回文件句柄。'关闭件。函返回一个此文件被修改日和时语法)第页的式以驱动。FileDateTime数示例本示用期。'设上为年月日下午时分秒。'设。='返回“2/12/93PM”。FileLen返回一个，代表一个文件的长度，单位是字节。语法pathname必要的参数用来指定一个文件名的字符串表达式。可以包含目录或文件夹、以及驱动器。说明当调用函数，已值这件在大。注意若要取一个打开文件长度大小，使用。FileLen函示例本示使用节中设为含有数据。Dim='返回文件的字节长度。描述返回一个下标从零开始的组数组包含基于指定筛选条件的一个字符串数组的子集。语法sourcesrray,[,[,compare]])Filter函数语法有如下的命：第页部分matchincludecompare

描述。。。值表示返回子包含还是不包含字果是，Filter返回含字符串数组子集如果include是Filter返回的是包含子字符串的数组子集。可选的数字值，表示所使用的字符串比较类型。有关其设，请参阅下面的“设置值”部分。值Compare参数的设置值如下：常数

值

描述–1012

用Compare语的设置值来行比较。二。文。只于MicrosoftAccess。基于的数据库信息来行比较。说明如果在sourcearray中没有发现与match匹配值Filter回一空数组。如果sourcearray是不是一个一维数，则产生错误。Filter元目找匹。Fix、函返回参数的整数部分。语法))必要的参数是或何效的数值表达式。如果包含Null，返回。说明第页Int和除的。Int和不同之处在于，如果number负数，则Int返回于或于number的一个整数而会返回大于或等于number的第一个负整数。例如，Int-8.4转成-9，而-8。)等：Sgn()*Int(Abs(numberFix函，函数示本及函数在返回数值的整数部时有何不同参数为负数时，Int函数返回小于等于该参数之最大整数，而函数则返回大于或等于该数之最整数。DimMyNumberMyNumber=Int(99.8)'返回MyNumber=Fix(99.2)'返回MyNumber=Int(-99.8)'返回。MyNumber=Fix(-99.8)'返回。MyNumber=Int(-99.2)'返回。MyNumber=Fix(-99.2)'返回。Format函返回，其指来。语法expression[,format[,[]Format函数的法具有下面个部分：部分expression

说明必要参数。任何有效的表式。可选参数。有效的命名表式或用户自定义格式表达式。firstdayofweek可参数。数，表示一星期的第一天。firstweekofyear可选参数。常数，表示一年的第一周。设参有面常数01

说明使设星第页234567

一二三四五六firstweekofyear参数有下面设置：常数

值

说明0123说明格

用API。从月日周从周天中从周作法数字日期和时间

使用预先定义的命名数值格式或创建用户定义数值格式。使用预先定义的命名日/时间格式或创建用户自定义日期/时间格式。日期和时间序数格式。字符串

创建自定义的字符串格。如果在格式化数字时没有指定会提与Str数类的功能，尽管它国际化然而作用在正数上不会保留正负号空间而以的话。如果要化个有本化的值字符该使用一个用户自定义数值格式，以得到的外。注意如属是，并且指定格那提expression必是如果Basic属性是Hijriexpression是。第页是Gregorian则format表果是Hijri，所有期式符例，,,yyyy有相的这意义只于日历。格式号保持英文，用于文本显示的符号（例如AM和PM）显与该符号有关的字符串（英文或阿拉伯数字）。当日历是时，一些符的范围会改变。符号

范围dmmmyyyyy

1-301-301-51显示完的月份名称（Hijri月名称无缩写式）1-355函数例本示例示用函化不期/），时（，以及AM/PM等文而，真的示格式会因计算机上的国际标准不同而有所差异在发阶段日与间是以短日期的格式配合代码的国际标准来显示的。在运行时，短日期则是根据系统的国际