《EXCELVBA帮助手册》由会员分享,可在线阅读,更多相关《EXCELVBA帮助手册(38页珍藏版)》请在金锄头文库上搜索。
1、Excel2003VBA帮助文档目录一些对象的应用方法4Add 方法5Add方法(Dictionary)6Add 方法(Folders)6Assert 方法7BuildPath 方法8Clear 方法8Close 方法9Copy 方法10CopyFile 方法10CopyFolder 方法11CreateFolder 方法12CreateTextFile 方法13Delete 方法14DeleteFile 方法14DeleteFolder 方法15DriveExists 方法15Exists 方法16FileExists 方法16FolderExists 方法17GetAbsolutePath
2、Name 方法17GetBaseName 方法18GetExtensionName 方法18GetFile 方法19GetFileName 方法19GetFolder 方法20GetParentFolderName 方法20GetSpecialFolder 方法21GetTempName 方法22Hide 方法22Item 方法23Items 方法24Keys方法24Move 方法25Move 方法(UseForm)251、应用于252、请参阅25MoveFile 方法25MoveFolder 方法26OpenAsTextStream 方法27OpenTextFile 方法28Print 方法
3、30PrintForm 方法31Raise 方法31Read 方法33ReadAll 方法33ReadLine 方法34Remove 方法34Remove 方法(FileSystemObject 对象)35RemoveAll 方法35Show 方法36Skip 方法37SkipLine 方法37WhatsThisMode 方法38Write 方法38WriteBlankLines 方法39WriteLine 方法39一些对象的应用方法1、Collection 对象ADD 方法、Item 方法、Remove 方法2、Debug 对象Assert 方法、Print 方法3、Dictionary对象
4、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 方法、Cop
5、yFolder 方法、CreateFolder 方法、CreateTextFile 方法、DeleteFile 方法、DeleteFolder 方法、DriveExists 方法、FileExists 方法、GetAbsolutePathName 方法、GetBaseName 方法、GetExtensionName 方法、GetFile 方法、GetFileName 方法、GetFolder 方法、GetParentFolderName 方法、GetSpecialFolder 方法、GetTempName 方法、MoveFile 方法、MoveFolder 方法、(21)OpenTextFil
6、e 方法8、UserForm 对象,UserForms 集合对象Hide 方法、PrintForm 方法、Show 方法、WhatsThisMode 方法9、TextStream 对象Close 方法、Read 方法、ReadAll 方法、ReadLine 方法、Skip 方法、SkipLine 方法、Write 方法、WriteBlankLines 方法、WriteLine 方法Add 方法添加一个成员到 Collection 对象。语法object.Add item, key, before, after Add 方法的语法具有下列对象限定符和命名参数:部分描述object必需的。对象表达
7、式,其值为“应用于”列表中的对象。item必需的。任意类型的表达式,指定要添加到集合中的成员。key可选的。唯一字符串表达式,指定可以使用的键字符串,代替位置索引来访问集合中的成员。before可选的。表达式,指定集合中的相对位置。在集合中将添加的成员放置在 before 参数识别的成员之前。如果为一数值表达式,则 before 必须是介于 1 和集合 Count 属性值之间的值。如果为一字符串表达式,则当添加一个被引用的成员到集合时,before 必须对应于指定的 key 值。可以指定 before 位置或 after 位置,但不能同时指定这两个位置。after可选。表达式,指定集合中的相对
8、位置。在集合中将添加的成员放置在 After 参数识别的成员之后。如果为一数值表达式,则 after 必须是介于 1 和集合 Count 属性值之间的值;如果为一字符串表达式,则当添加一个被引用的成员到集合时,after 必须对应于指定的 key 值。可以指定 before 位置或 after 位置,但不能同时指定这两个位置。说明before 或 after 参数是字符串表达式或数值表达式,均须引用集合中现有成员,否则将导致错误发生。如果指定的 key 和集合中现有成员的 key 发生重复,则也会导致错误发生。1、应用于Collection 对象2、请参阅Item方法、Remove方法Add
9、方法示例本示例使用 Add 方法将 Inst 对象(类 Class1 之示例,其中包含 Public 变量 InstanceName )加到 MyClasses 集合对象中。若要观察程序的运作,插入一个类模块,并在 Class1 的模块级中声明公用变量 InstanceName(键入 Public InstanceName)来保存每个示例的名称。类名就用缺省的 Class1。将下列代码复制与粘贴到某个窗体模块的 Form_Load 事件过程中。Dim MyClasses As New Collection 建立集合对象。Dim Num As Integer 定义计数变量。Dim MsgDim
10、TheName 用来保存用户指定的名称的变量。Do Dim Inst As New Class1 建立 Class1 的新示例。 Num = Num + 1 将计数变量加一,并让用户输入名称。 Msg = Please enter a name for this object. & Chr(13) _ & Press Cancel to see names in collection. TheName = InputBox(Msg, Name the Collection Items) Inst.InstanceName = TheName 将输入的名称存到对象的示例中。 如果名称不是空字符串
11、,则将该示例加到集合对象中。 If Inst.InstanceName Then 将该示例加到集合对象中。 MyClasses.Add item := Inst, key := CStr(Num) End If 清除对当前示例的引用,以准备下一个。 Set Inst = NothingLoop Until TheName = For Each x In MyClasses MsgBox x.instancename, , Instance NameNextAdd方法(Dictionary)描述添加一对相对应的关键字和条目到 Dictionary 对象。语法object.Add key, ite
12、mAdd方法的语法有如下几部分:部分描述Object必需的。一个 Dictionary 对象的名字。Key必需的。与所添加的条目相关联的关键字。Item必需的。与所添加的关键字相关联的条目。说明如果该关键字已经存在,则产生一个错误。1、应用于Dictionary 对象2、请参阅ADD方法(Folder)、Exist方法、Items方法、Keys方法、Remove方法、RemoveAll方法Add 方法(Folders)描述添加一个新的 Folder 到 Folders 集合。语法object.Add folderNameAdd方法的语法有如下几部分:部分描述Object必需的。一个Folder
13、s集合的名称。FolderName必需的。新添加的Folder的名称。说明如果 folderName 已经存在,则产生一个错误。1、应用于Folders 集合2、请参阅Add方法(Dictionary)Assert 方法有条件地在该方法出现的行上挂起执行。语法object.Assert booleanexpressionAssert 方法的语法有如下的对象限定符和参数:部分描述object必需的。总是 Debug 对象。booleanexpression必需的。一个值为 True 或者 False 的表达式。说明Assert 调用只在开发环境中工作。当模块被编译成为一个可执行的文件时,调用 D
14、ebug 对象的方法就会被忽略。全部 booleanexpression 常常被计算。例如,即使一个 And 表达式的第一部分被计算为 False,整个表达式还要被计算。1、应用于Debug 对象2、请参阅Print 方法Assert 方法示例下面的示例说明如何使用 Assert 方法。示例需要一个带有两个按纽控件的窗体。缺省的按纽名称是 Command1 和 Command2 。当示例运行时,单击 Command1 按纽使得按纽上的文本在 0 和 1 之间进行切换。单击 Command2 按纽可能不做任何事,也可能引起一个确认,应该执行哪一个操作取决于 Command1 按纽上所显示的值。该确认将在最后一个语句执行之后使整个执行停止,并且 Debug.Assert 行被突出显式。Option ExplicitPrivate blnAssert As BooleanPrivate intNumber As IntegerPrivate Sub Command1_Click() blnAssert = Not blnAssert intNumber = IIf(intNumber 0, 0, 1)