EXCELVBA帮助手册.docx

EXCELVBA帮助手册.docx

《EXCELVBA帮助手册.docx》由会员分享，可在线阅读，更多相关《EXCELVBA帮助手册.docx（38页珍藏版）》请在冰豆网上搜索。

Excel2003VBA

帮助文档

目录

一些对象的应用方法 4

Add方法 5

Add方法（Dictionary） 6

Add方法（Folders） 6

Assert方法 7

BuildPath方法 8

Clear方法 8

Close方法 9

Copy方法 10

CopyFile方法 10

CopyFolder方法 11

CreateFolder方法 12

CreateTextFile方法 13

Delete方法 14

DeleteFile方法 14

DeleteFolder方法 15

DriveExists方法 15

Exists方法 16

FileExists方法 16

FolderExists方法 17

GetAbsolutePathName方法 17

GetBaseName方法 18

GetExtensionName方法 18

GetFile方法 19

GetFileName方法 19

GetFolder方法 20

GetParentFolderName方法 20

GetSpecialFolder方法 21

GetTempName方法 22

Hide方法 22

Item方法 23

Items方法 24

Keys方法 24

Move方法 25

Move方法（UseForm） 25

1、应用于 25

2、请参阅 25

MoveFile方法 25

MoveFolder方法 26

OpenAsTextStream方法 27

OpenTextFile方法 28

Print方法 30

PrintForm方法 31

Raise方法 31

Read方法 33

ReadAll方法 33

ReadLine方法 34

Remove方法 34

Remove方法（FileSystemObject对象） 35

RemoveAll方法 35

Show方法 36

Skip方法 37

SkipLine方法 37

WhatsThisMode方法 38

Write方法 38

WriteBlankLines方法 39

WriteLine方法 39

一些对象的应用方法

1、Collection对象

⑴ADD方法、⑵Item方法、⑶Remove方法

2、Debug对象

⑴Assert方法、⑵Print方法

3、Dictionary对象

⑴Add方法（Dictionary）、⑵Exists方法、⑶Items方法、⑷Keys方法、⑸Remove方法、⑹Remove方法（FileSystemObject对象）、⑺RemoveAll方法、

4、Err对象

⑴Clear方法、⑵Raise方法

5、File对象、Folder对象

⑴Copy方法、⑵Delete方法、⑶CreateTextFile方法（Folder对象）、⑷Move方法、⑸OpenAsTextStream方法（File对象）

6、Folders集合

⑴Add方法（Folders）

7、FileSystemObject对象

⑴BuildPath方法、⑵CopyFile方法、⑶CopyFolder方法、⑷CreateFolder方法、⑸CreateTextFile方法、⑹DeleteFile方法、⑺DeleteFolder方法、⑻DriveExists方法、⑼FileExists方法、⑽GetAbsolutePathName方法、⑾GetBaseName方法、⑿GetExtensionName方法、⒀GetFile方法、⒁GetFileName方法、⒂GetFolder方法、⒃GetParentFolderName方法、⒄GetSpecialFolder方法、⒅GetTempName方法、⒆MoveFile方法、⒇MoveFolder方法、（21）OpenTextFile方法

8、UserForm对象，UserForms集合对象

⑴Hide方法、⑵PrintForm方法、⑶Show方法、⑷WhatsThisMode方法

9、TextStream对象

⑴Close方法、⑵Read方法、⑶ReadAll方法、⑷ReadLine方法、⑸Skip方法、⑹SkipLine方法、⑺Write方法、⑻WriteBlankLines方法、⑼WriteLine方法

Add方法

添加一个成员到Collection对象。

语法

object.Additem,key,before,after

Add方法的语法具有下列对象限定符和命名参数：

部分

描述

object

必需的。

对象表达式，其值为“应用于”列表中的对象。

item

必需的。

任意类型的表达式，指定要添加到集合中的成员。

key

可选的。

唯一字符串表达式，指定可以使用的键字符串，代替位置索引来访问集合中的成员。

before

可选的。

表达式，指定集合中的相对位置。

在集合中将添加的成员放置在before参数识别的成员之前。

如果为一数值表达式，则before必须是介于1和集合Count属性值之间的值。

如果为一字符串表达式，则当添加一个被引用的成员到集合时，before必须对应于指定的key值。

可以指定before位置或after位置，但不能同时指定这两个位置。

after

可选。

表达式，指定集合中的相对位置。

在集合中将添加的成员放置在After参数识别的成员之后。

如果为一数值表达式，则after必须是介于1和集合Count属性值之间的值；如果为一字符串表达式，则当添加一个被引用的成员到集合时，after必须对应于指定的key值。

可以指定before位置或after位置，但不能同时指定这两个位置。

说明

before或after参数是字符串表达式或数值表达式，均须引用集合中现有成员，否则将导致错误发生。

如果指定的key和集合中现有成员的key发生重复，则也会导致错误发生。

1、应用于Collection对象

2、请参阅Item方法、Remove方法

Add方法示例

本示例使用Add方法将Inst对象（类Class1之示例，其中包含Public变量InstanceName）加到MyClasses集合对象中。

若要观察程序的运作，插入一个类模块，并在Class1的模块级中声明公用变量InstanceName（键入PublicInstanceName）来保存每个示例的名称。

类名就用缺省的Class1。

将下列代码复制与粘贴到某个窗体模块的Form_Load事件过程中。

DimMyClassesAsNewCollection'建立集合对象。

DimNumAsInteger'定义计数变量。

DimMsg

DimTheName'用来保存用户指定的名称的变量。

Do

DimInstAsNewClass1'建立Class1的新示例。

Num=Num+1'将计数变量加一，并让用户输入名称。

Msg="Pleaseenteranameforthisobject."&Chr（13）_

&"PressCanceltoseenamesincollection."

TheName=InputBox（Msg,"NametheCollectionItems"）

Inst.InstanceName=TheName'将输入的名称存到对象的示例中。

'如果名称不是空字符串，则将该示例加到集合对象中。

IfInst.InstanceName<>""Then

'将该示例加到集合对象中。

MyClasses.Additem:

=Inst,key:

=CStr（Num）

EndIf

'清除对当前示例的引用，以准备下一个。

SetInst=Nothing

LoopUntilTheName=""

ForEachxInMyClasses

MsgBoxx.instancename,,"InstanceName"

Next

Add方法（Dictionary）

描述

添加一对相对应的关键字和条目到Dictionary对象。

语法

object.Addkey,item

Add方法的语法有如下几部分：

部分

描述

Object

必需的。

一个Dictionary对象的名字。

Key

必需的。

与所添加的条目相关联的关键字。

Item

必需的。

与所添加的关键字相关联的条目。

说明

如果该关键字已经存在，则产生一个错误。

1、应用于Dictionary对象

2、请参阅ADD方法（Folder）、Exist方法、Items方法、Keys方法、Remove方法、RemoveAll方法

Add方法（Folders）

描述

添加一个新的Folder到Folders集合。

语法

object.AddfolderName

Add方法的语法有如下几部分：

部分

描述

Object

必需的。

一个Folders集合的名称。

FolderName

必需的。

新添加的Folder的名称。

说明

如果folderName已经存在，则产生一个错误。

1、应用于Folders集合

2、请参阅Add方法（Dictionary）

Assert方法

有条件地在该方法出现的行上挂起执行。

语法

object.Assertbooleanexpression

Assert方法的语法有如下的对象限定符和参数：

部分

描述

object

必需的。

总是Debug对象。

booleanexpression

必需的。

一个值为True或者False的表达式。

说明

Assert调用只在开发环境中工作。

当模块被编译成为一个可执行的文件时，调用Debug对象的方法就会被忽略。

全部booleanexpression常常被计算。

例如，即使一个And表达式的第一部分被计算为False，整个表达式还要被计算。

1、应用于Debug对象

2、请参阅Print方法

Assert方法示例

下面的示例说明如何使用Assert方法。

示例需要一个带有两个按纽控件的窗体。

缺省的按纽名称是Command1和Command2。

当示例运行时，单击Command1按纽使得按纽上的文本在0和1之间进行切换。

单击Command2按纽可能不做任何事，也可能引起一个确认，应该执行哪一个操作取决于Command1按纽上所显示的值。

该确认将在最后一个语句执行之后使整个执行停止，并且Debug.Assert行被突出显式。

OptionExplicit

PrivateblnAssertAsBoolean

PrivateintNumberAsInteger

PrivateSubCommand1_Click（）

blnAssert=NotblnAssert

intNumber=IIf（intNumber<>0,0,1）