VB内置函数大全Word格式.docx
《VB内置函数大全Word格式.docx》由会员分享,可在线阅读,更多相关《VB内置函数大全Word格式.docx(27页珍藏版)》请在冰豆网上搜索。
中没有包含任何字符,则会产生运行时错误。
在非
DBCS
系统下,返回值范围为
–
255
。
在
系统下,则为
-32768
32767。
AscB
函数作用于包含在字符串中的字节数据,AscB
返回第一个字节的字符代码,而非字符的字符代码。
AscW
函数返回
Unicode
字符代码,若平台不支持
Unicode,则与
Asc
函数功能相同。
Atn(number)
Double,指定一个数的反正切值。
参数是一个
Double或任何有效的数值表达式。
Atn
函数的参数值
(number)
为直角三角形两边的比值并返回以弧度为单位的角。
这个比值是角的对边长度除以角的邻边长度之商。
值的范围在
-pi/2
pi/2
弧度之间。
为了将角度转换为弧度,请将角度乘以
pi/180。
为了将弧度转换为角度,请将弧度乘以
180/pi。
是
Tan
的反三角函数,Tan
的参数值为角度,返回直角三角形的两条边的比值。
不要将
和余切函数混淆,余切函数值是正切函数值的倒数,cotangent
(1/tangent)。
CallByName(object,
procedurename,
calltype,[arguments()])
执行一个对象的方法,或者设置或返回一个对象的属性。
object
必需的;
变体型(对象)。
函数将要执行的对象的名称。
procedurename
变体型(字符串)。
一个包含该对象的属性名称或者方法名称的字符串表达式。
calltype
常数。
一个
vbCallType
类型的常数,代表正在被调用的过程的类型。
arguments()
可选的:
变体型(数组)。
CallByName
函数用于获取或者设置一个属性,或者在运行时使用一个字符串名称来调用一个方法。
在下面的例子中,第一行使用
来设置一个文本框的
MousePointer
属性,第二行得到
属性的值,第三行调用
Move
方法来移动文本框:
Text1,
"
MousePointer"
vbLet,
vbCrosshair
Result
(Text1,
vbGet)
Move"
vbMethod,
100,
100
Choose(index,
choice-1[,
choice-2,
...
[,
choice-n]])
从参数列表中选择并返回一个值。
Choose
函数的语法具有以下几个部分:
index
必要参数,数值表达式或字段,它的运算结果是一个数值,且界于
1
和可选择的项目数之间。
choice
必要参数,Variant
表达式,包含可选择项目的其中之一。
会根据
的值来返回选择项列表中的某个值。
1,则
会返回列表中的第
个选择项。
2,则会返回列表中的第
2
个选择项,以此类推。
可以使用
来查阅一个列表中的项目。
例如,如果
所指定的值为
3,而
choice-1
one"
、choice-2
two"
、且
choice-3
three"
,那么
将返回
当
代表一选项组中的值时,则这项功能将会特别有用。
即使它只返回一个选项值,Choose
仍然会计算列表中的每个选择项。
所以应该注意到这项副作用。
例如,当在每个选择项表达式中使用了
MsgBox
函数作为其中的一部分时,每计算一个选择项,就会显示一次消息框。
index小于
或大于列出的选择项数目时,Choose
Null。
不是整数,则会先四舍五入为与其最接近的整数。
Chr(charcode)
返回
String,其中包含有与指定的字符代码相关的字符
Command
返回命令行的参数部分,该命令行用于装入
Microsoft
Visual
Basic
或
开发的可执行程序。
当从命令行装入
时,/cmd
之后的命令行的任何部分作为命令行的参数传递给程序。
下面的示例中,cmdlineargs
代表
Command
函数返回的参数信息。
VB
/cmd
cmdlineargs
对于使用
开发并编译为
.exe
文件的应用程序,Command
返回出现在命令行中应用程序名之后的任何参数。
例如:
MyApp
Cos(number)
Double,指定一个角的余弦值。
∙2007-5-2122:
26
∙回复
∙
∙Ultraman_King
∙0位粉丝
2楼
CreateObject(class,[servername])
创建并返回一个对
ActiveX
对象的引用。
每个支持自动化的应用程序都至少提供一种对象类型。
例如,一个字处理应用程序可能会提供
Application
对象,Document
对象,以及
Toolbar
对象。
要创建
对象,只需将
CreateObject
返回的对象赋给一个对象变量:
'
声明一个对象变量来存放该对象
的引用。
as
Object
采用后期绑定方式。
ExcelSheet
Object
Set
CreateObject("
Excel.Sheet"
)
上述代码将启动该应用程序创建该对象,在本例中就是创建一个
Excel
电子数据表。
对象创建后,就可以在代码中使用自定义的对象变量来引用该对象。
在下面的示例中,可以使用对象变量
来访问新建对象的属性和方法,以及访问
的其它对象,包括应用程序对象和单元格集合。
设置
对象使
可见
ExcelSheet.Application.Visible
True
在表格的第一个单元中写些文本
ExcelSheet.Cells(1,
1).Value
This
is
column
A,
row
1"
将该表格保存到
C:
\test.doc
目录
ExcelSheet.SaveAs
\
TEST.DOC"
使用应用程序对象的
Quit
方法关闭
Excel。
ExcelSheet.Application.Quit
释放该对象变量
Nothing
子句声明对象变量,可以创建一个能包含任何类型对象引用的变量。
不过,该变量访问对象是后期绑定的,也就是说,绑定在程序运行时才进行。
要创建一个使用前期绑定方式的对象变量,也就是说,在程序编译时就完成绑定,则对象变量在声明时应指定类
ID。
例如,可以声明并创建下列
引用:
xlApp
Excel.Application
xlBook
Excel.Workbook
xlSheet
Excel.WorkSheet
Excel.Application"
xlApp.Workbooks.Add
xlBook.Worksheets
(1)
前期绑定的变量引用可以提供更好的性能,但该变量只能存放声明中所指定的类的引用。
可以将
函数返回的对象传给一个参数为对象的函数。
例如,下面的代码创建并传递了一个
对象的引用:
Call
MySub
(CreateObject("
))
可以在一个远端连网的计算机上创建一个对象,方法是把计算机的名称传递给
的
servername
参数。
这个名称与共享名称的机器名部份相同:
对于一个共享名称为
\\\\MyServer\\Public,"
参数是
MyServer"
下面的代码返回在一个名为
MyServer
的远端计算机上运行的
实例的版本号:
Debug.Print
xlApp.Version
如果远端服务器不存在或者不可用,则会发生一个运行时错误。
当该对象当前没有实例时,应使用
CreateObject。
如果该对象已有实例在运行,就会启动一个新的实例,并创建一个指定类型的对象。
要使用当前实例,或要启动该应用程序并加载一个文件,可以使用
GetObject
函数。
如果对象已登记为单个实例对象,则不管执行多少次
CreateObject,都只能创建该对象的一个实例。
27
3楼
CurDir[(drive)]
(String),用来代表当前的路径。
可选的
drive
参数是一个字符串表达式,它指定一个存在的驱动器。
如果没有指定驱动器,或
是零长度字符串
("
),则
CurDir
会返回当前驱动器的路径。
CVErr(errornumber)
Error
子类型的
Variant,其中包含指定的错误号。
errornumber
参数可以是任何有效的错误号代码。
可以在过程中,使用
CVErr
函数来创建用户自定义错误。
例如,如果创建一个函数,它可以接受若干个参数,且正常返回一个字符串,则可以让函数来判断输入的参数,确认它们是在可接受的范围内。
如果不是的话,此函数将不会返回所要的字符串。
在这种情况下,CVErr
可以返回一个错误号,并告知应该采取的行动。
注意,Error
的隐式转换是不允许的,例如,不能直接把
的返回值赋值给一个非
的变量。
然而,可以对
的返回值进行显式转换(使用
CInt、CDbl
等等),并赋值给适当的数据类型变量。
28
5楼
Date
返回包含系统日期的
(Date)。
DateAdd(interval,
number,
date)
返回包含一个日期的
(Date),这一日期还加上了一段时间间隔。
DateAdd
函数语法中有下列命名参数:
interval
必要。
字符串表达式,是所要加上去的时间间隔。
数值表达式,是要加上的时间间隔的数目。
其数值可以为正数(得到未来的日期),也可以为负数(得到过去的日期)。
date
(Date)
或表示日期的文字,这一日期还加上了时间间隔。
参数具有以下设定值:
yyyy
年
q
季
m
月
y
一年的日数
d
日
w
一周的日数
ww
周
h
时
n
分钟
s
秒
函数对日期加上或减去指定的时间间隔。
例如,可以用
来计算距今天为三十天的日期;
或者计算距现在为
45
分钟的时间。
为了对
加上“日”,可以使用“一年的日数”
(“y”),“日”
(”d”)
或“一周的日数”
(”w”)。
函数将不返回有效日期。
在以下实例中将
月31
日加上一个月:
DateAdd(m,
1,
31-Jan-95)
上例中,DateAdd
1995
28
日,而不是
31
日。
1996
日,则由于
年是闰年,返回值是
29
如果计算的日期超前
100
年(减去的年度超过
中的年份),就会导致错误发生。
不是一个
Long
值,则在计算时取最接近的整数值来计算。
返回值的格式由
Control
Panel设置决定,而不是由传递到date
参数的格式决定。
30
6楼
DateDiff(interval,
date1,
date2[,
firstdayofweek[,
firstweekofyear]])
(Long)
的值,表示两个指定日期间的时间间隔数目。
interval设置同上
firstdayofweek
参数的设定值如下:
常数
值
描述
vbUseSystem
NLS
API
设置。
vbSunday
星期日(缺省值)
vbMonday
星期一
vbTuesday
3
星期二
vbWednesday
4
星期三
vbThursday
5
星期四
vbFriday
6
星期五
vbSaturday
7
星期六
用
vbFirstJan1
从包含
日的星期开始(缺省值)。
vbFirstFourDays
从第一个其大半个星期在新的一年的一周开始。
vbFirstFullWeek
从第一个无跨年度的星期开始。
31
7楼
DatePart(interval,
date[,firstdayofweek[,
返回一个包含已知日期的指定时间部分的
(Integer)。
DatePart
函数可以用来计算日期并返回指定的时间间隔。
例如,可以使用DatePart
计算某个日期是星期几或目前为几点钟。
参数会影响使用时间间隔符号
“W”
“WW”
计算的结果。
是日期文字,则指定的年份成为该日期的固定部分。
但是,如果
用双引号
)
括起来,且年份略而不提,则在每次计算
表达式时,当前年份都会插入到代码之中。
这样就可以书写适用于不同年份的程序代码。
DateSerial(year,
month,
day)
返回包含指定的年、月、日的
为了指定某个日期,如
1991
12
日,DateSerial
函数中的每个参数的取值范围应该是可接受的;
即,日的取值范围应在
1-31
之间,而月的取值范围应在
1-12
之间。
但是,当一个数值表达式表示某日之前或其后的年、月、日数时,也可以为每个使用这个数值表达式的参数指定相对日期。
以下示例中使用了数值表达式代替绝对日期。
这里,DateSerial
1990
8
日的
十
(1990
-
10)
零两个月
(8
2)
又一天
(1
1)
之前的日期;
换句话说,就是
1980
DateSerial(1990
10,
2,
1)
year
参数的数值若介于
与
之间,则将其解释为
2000–2029年,若介于
30
99
之间则解释为1930–1999年。
而对所有其它
参数,则请用四位数值表示(如
1800)。
当任何一个参数的取值超出可接受的范围时,它会适时进位到下一个较大的时间单位。
例如,如果指定了
35
天,则这个天数被解释成一个月加上多出来的日数,多出来的日数将由其年份与月份来决定。
如果一个参数值超出
-32,768
到
32,767
的范围,就会导致错误发生。
DateValue(date)
33
8楼
Day(date)
(Integer),其值为
之间的整数,表示一个月中的某一日。
DDB(cost,
salvage,
life,
period[,
factor])
Double,指定一笔资产在一特定期间内的折旧。
可使用双下落收复平衡方法或其它指定的方法进行计算。
Dir[(pathname[,
attributes])]
String,用以表示一个文件名、目录名或文件夹名称,它必须与指定的模式或文件属性、或磁盘卷标相匹配。
Dir
部分
pathname
可选参数。
用来指定文件名的字符串表达式,可能包含目录或文件夹、以及驱动器。
如果没有找到
pathname,则会返回零长度字符串
)。
attributes
常数或数值表达式,其总和用来指定文件属性。
如果省略,则会返回匹配
但不包含属性的文件。
参数的设置可为:
vbNormal
(缺省)
指定没有属性的文件。
vbReadOnly
指定无属性的只读文件
vbHidden
指定无属性的隐藏文件
VbSystem
指定无属性的系统文件
vbVolume
指定卷标文件;
如果指定了其它属性,则忽略vbVolume
vbDirectory
16
指定无属性文件及其路径和文件夹。
这些常数是由
VBA
所指定的,在程序代码中的任何位置,可以使用这些常数来替换真正的数值。
支持多字符
(*)
和单字符
(?
的通配符来指定多重文件。
由于
Macintosh
不支持通配符,使用文件类型指定文件组。
MacID
函数指定文件类型而不用文件名。
比如,下列语句返回当前文件夹中第一个TEXT文件的名称:
Dir("
SomePath"
MacID("
TEXT"
为选中文件夹中所有文件,指定一空串:
Windows
中,如果在Dir函数中使用MacID函数,将产生错误。
任何大于256的attribute值都被认为是MacID
函数的值。
在第一次调用
函数时,必须指定
pathname,否则会产生错误。
如果也指定了文件属性,那么就必须包括
pathname。
会返回匹配
的第一个文件名。
若想得到其它匹配
的文件名,再一次调用
Dir,且不要使用参数。
如果已没有合乎条件的文件,则
会返回一个零长度字符串
一旦返回值为零长度字符串,并要再次调用
时,就必须指定
不必访问到所有匹配当前
的文件名,就可以改变到一个新的
上。
但是,不能以递归方式来调用
以
属性来调用
不能连续地返回子目录。
提示
由于文件名并不会以特别的次序来返回,所以可以将文件名存储在一个数组中,然后再对这个数组排序。
35
∙LoveVB2007
9楼
好了不起啊!
真是佩服啊!
值得学习和感激!
辛苦了~~谢谢您!
37
10楼
DoEvents(
转让控制权,以便让操作系统处理其它的事件。
Environ({envstring
|
number})
String,它关连于一个操作系统环境变量。
中不可用
如果在环境字符串表格中找不到
envstring,则会返回一个零长度字符串
如果找到,则
Environ
会返回一段文本,文本是赋值给指定的
envstring
的,也就是说,在环境字符串表格中对应那个环境变量的等号
(=)
后面的那段文本。
如果指定了
number,则在环境字符串表格中相应位置上的字符串会返回。
在这种情况下,Environ
会返回整个文本,包括
envstring。
如果在指定位置上