EXCELVBA帮助介绍及其说明手册.doc

-_Excel2003VBA 帮助文档帮助文档第 2 页目录目录一些对象的应用方法.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 1、应用于、应用于.25 2 2、请参阅、请参阅.25 MoveFile 方法.25 MoveFolder 方法.26 OpenAsTextStream 方法.27 OpenTextFile 方法 .28 Print 方法.30第 3 页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第 4 页一些对象的应用方法一些对象的应用方法1 1、CollectionCollection 对象对象ADDADD 方法、方法、ItemItem 方法、方法、RemoveRemove 方法方法2 2、DebugDebug 对象对象AssertAssert 方法、方法、PrintPrint 方法方法3 3、DictionaryDictionary 对象对象AddAdd 方法方法(Dictionary)(Dictionary)、ExistsExists 方法、方法、ItemsItems 方法、方法、KeysKeys 方法、方法、RemoveRemove 方法、方法、RemoveRemove 方法（方法（FileSystemObjectFileSystemObject 对象）对象） 、RemoveAllRemoveAll 方法、方法、4 4、ErrErr 对象对象ClearClear 方法、方法、RaiseRaise 方法方法5 5、FileFile 对象、对象、FolderFolder 对象对象CopyCopy 方法、方法、DeleteDelete 方法、方法、CreateTextFileCreateTextFile 方法（方法（FolderFolder 对象）对象） 、MoveMove 方法、方法、OpenAsTextStreamOpenAsTextStream 方法（方法（FileFile 对象）对象）6 6、FoldersFolders 集合集合AddAdd 方法方法(Folders)(Folders)7 7、FileSystemObjectFileSystemObject 对象对象BuildPathBuildPath 方法、方法、CopyFileCopyFile 方法、方法、CopyFolderCopyFolder 方法、方法、CreateFolderCreateFolder 方法、方法、CreateTextFileCreateTextFile 方法、方法、DeleteFileDeleteFile 方法、方法、DeleteFolderDeleteFolder 方法、方法、DriveExistsDriveExists 方法、方法、FileExistsFileExists 方法、方法、GetAbsolutePathNameGetAbsolutePathName 方法、方法、GetBaseNameGetBaseName 方法、方法、GetExtensionNameGetExtensionName 方法、方法、GetFileGetFile 方法、方法、GetFileNameGetFileName 方法、方法、GetFolderGetFolder 方法、方法、GetParentFolderNameGetParentFolderName 方法、方法、GetSpecialFolderGetSpecialFolder 方法、方法、GetTempNameGetTempName 方法、方法、MoveFileMoveFile 方法、方法、MoveFolderMoveFolder 方法、方法、(21)(21)OpenTextFileOpenTextFile 方法方法8 8、UserFormUserForm 对象，对象，UserFormsUserForms 集合对象集合对象HideHide 方法、方法、PrintFormPrintForm 方法、方法、ShowShow 方法、方法、WhatsThisModeWhatsThisMode 方法方法9 9、TextStreamTextStream 对象对象CloseClose 方法、方法、ReadRead 方法、方法、ReadAllReadAll 方法、方法、ReadLineReadLine 方法、方法、SkipSkip 方法、方法、SkipLineSkipLine 方法、方法、WriteWrite 方法、方法、WriteBlankLinesWriteBlankLines 方法、方法、WriteLineWriteLine 方法方法第 5 页AddAdd 方法方法添加一个成员到 CollectionCollection 对象。 语法语法 object.Add.Add itemitem, , keykey, , beforebefore, , afterafter AddAdd 方法的语法具有下列对象限定符和命名参数：部分部分描述描述object必需的。对象表达式，其值为“应用于”列表中的对象。itemitem必需的。任意类型的表达式，指定要添加到集合中的成员。keykey可选的。唯一字符串表达式，指定可以使用的键字符串，代替位置索 引来访问集合中的成员。beforebefore可选的。表达式，指定集合中的相对位置。在集合中将添加的成员放置在 beforebefore 参数识别的成员之前。如果为一数值表达式，则 beforebefore 必须是介于 1 和集合 CountCount 属性值之间的值。如果为一字符串表达 式，则当添加一个被引用的成员到集合时，beforebefore 必须对应于指定的 keykey 值。可以指定 beforebefore 位置或 afterafter 位置，但不能同时指定这两 个位置。afterafter可选。表达式，指定集合中的相对位置。在集合中将添加的成员放置在 AfterAfter 参数识别的成员之后。如果为一数值表达式，则 afterafter 必 须是介于 1 和集合 CountCount 属性值之间的值；如果为一字符串表达式， 则当添加一个被引用的成员到集合时，afterafter 必须对应于指定的 keykey 值。可以指定 beforebefore 位置或 afterafter 位置，但不能同时指定这两个位 置。说明说明 beforebefore 或 afterafter 参数是字符串表达式或数值表达式，均须引用集合中现有成 员，否则将导致错误发生。 如果指定的 keykey 和集合中现有成员的 keykey 发生重复，则也会导致错误发生。 1 1、应用于、应用于 CollectionCollection 对象对象 2 2、请参阅请参阅 ItemItem 方法、方法、RemoveRemove 方法方法Add 方法示例方法示例本示例使用 AddAdd 方法将 Inst 对象（类 Class1 之示例，其中包含 PublicPublic 变 量 InstanceName ）加到 MyClasses 集合对象中。若要观察程序的运作，插入 一个类模块，并在 Class1 的模块级中声明公用变量 InstanceName（键入 PublicPublic InstanceName）来保存每个示例的名称。类名就用缺省的 Class1。将 下列代码复制与粘贴到某个窗体模块的 Form_Load 事件过程中。 Dim MyClasses As New Collection ' 建立集合对象。 Dim Num As Integer ' 定义计数变量。 Dim Msg第 6 页Dim TheName ' 用来保存用户指定的名称的变量。 DoDim Inst As New Class1 ' 建立 Class1 的新示例。Num = Num + 1 ' 将计数变量加一，并让用户输入名称。Msg = “Please enter a name for this object.“ ;) 直接将插入点定位在上一个被显示的字符之后。使用 Tab(Tab(n) ) 将插入点定位在绝对 列号上。使用无参数的 TabTab 将插入点定位在下一个打印区的起始 位置。如果省略 charpos，则在下一行打印下一字符。说明说明 可以用空白或分号来分隔多个表达式。 对系统指定的区域设置，用小数点分隔符将所有打印到 ImmediateImmediate 视窗的数据 正确格式化。关键字要用适用于主应用程序的语言输出。第 30 页对于 Boolean 数据，或者打印 True 或者打印 False。根据主机应用程序的地 区设置来翻译 TrueTrue 和 FalseFalse 关键字。 使用系统能识别的标准短日期格式书写 Date 数据。当日期或时间部件丢失或 为零时，只书写已提供的部件。 如果 outputlist 数据是 Empty，则无内容可写。但是，如果 outputlist 数据是 Null，则输出 Null。在输出 Null 关键字时，要把关键字正确翻译出来。要把错误数据作为 Error errorcode 输出。在输出 ErrorError 关键字时，要把关键字正确翻译出来。 如果在具有缺省显示空间的模块外使用此方法，则需要 object。例如，如果没 有指定对象就在标准模块上调用此方法，则将导致错误发生，但是，如果在窗 体模块上进行调用，则会在窗体上显示“outputlist”。 注意注意 因为 PrintPrint 方法是按照字符比例进行打印，所以字符数与字符所占据的 宽度固定的列的数目无关。例如，像 “W” 这样的宽字母占据的宽度超过一固 定列宽，而像 “i“ 这样的窄字母占据的宽度则较小。考虑到要使用比平均字符 更宽的空间，表列一定要留有足够余地。另外，也可以使用固定间距的字体 （像 Courier 字体）来确保每一字符均只占一列。 1 1、应用于、应用于 DebugDebug 对象对象 2 2、请参阅请参阅 AssertAssert 方法、方法、PrintPrint # # 语句、语句、SpcSpc 函数、函数、TabTab 函数函数Print 方法示例方法示例本示例使用 PrintPrint 方法在“调试调试”窗口的“立即立即”面板中显示变量 MyVar 的 值。请注意，PrintPrint 方法只能用于可显示文本的对象。 Dim MyVar MyVar = “Come see me in the Immediate pane.” Debug.Print MyVar PrintFormPrintForm 方法方法将 UserFormUserForm 对象的图象逐位发送到打印机。 语法语法 object.PrintForm.PrintForm object 代表对象表达式，其值为“1、应用于”列表中的对象。如果省略掉 object，则把焦点所在的 UserFormUserForm 当做 object。 说明说明 PrintFormPrintForm 可以打印所有可见对象以及 UserFormUserForm 对象的位图。PrintFormPrintForm 也 可打印 UserFormUserForm 对象上的图形。 PrintFormPrintForm 用什么打印机要取决于操作系统的“控制面板控制面板”中的设置。 1 1、应用于应用于 UserFormUserForm 对象，对象，UserFormsUserForms 集合对象集合对象PrintForm 方法示例方法示例在下列示例中，当用户单击窗体时，程序将窗体的客户区域打印出来。 ' UserForm1 的 Click 事件第 31 页Private Sub UserForm_Click()UserForm1.PrintForm End Sub RaiseRaise 方法方法产生运行时错误。 语法语法 object.Raise.Raise numbernumber, , sourcesource, , descriptiondescription, , helpfilehelpfile, , helpcontexthelpcontext RaiseRaise 方法具有下列对象限定符和命名参数：参数参数描述描述object必需的。总是 ErrErr 对象。NumberNumber必需的。Long 整数，识别错误性质。Visual Basic 错误（既有 Visual Basic 定义的错误也有用户定义的错误）的范围在 0 65535 之间。从 0512 的范围保留为系统错误；从 513 65535 的范围可以用做用户定义的错误。当在类模块中将 NumberNumber 属性设置成自己的错误代码时，可将错误代码号添加到 vbObjectErrorvbObjectError 常数上。例如，为了产生错误号 513，可将 vbObjectErrorvbObjectError + 513 赋值到 NumberNumber 属性。sourcesource可选的。字符串表达式，为产生错误的对象或应用程序命名。 当设置对象的这一属性时，要使用窗体 project.class。如果 没有指定 source，则使用当前 Visual Basic 工程的程序设计 ID。descriptiondescription可选的。描述错误的字符串表达式。如果没有指定，则检查 NumberNumber 的值。如果可以将错误映射成 Visual Basic 运行时错误代码，则将 ErrorError 函数返回的字符串作为 DescriptionDescription 使 用。如果没有与 NumberNumber 对应的 Visual Basic 错误，则要用 到消息“应用程序定义的错误或对象定义的错误”。helpfilehelpfile可选的。帮助文件的完整限定的路径，在帮助文件中可以找到 有关错误的帮助信息。如果没有指定，则 Visual Basic 会使 用 Visual Basic 帮助文件的完整限定的驱动器、路径和文件 名。helpcontexthelpcontext可选的。识别 helpfilehelpfile 内的标题的上下文 ID，而 helpfilehelpfile 提供有助于了解错误的描述。如果省略，则使用处理有关错误 的 Visual Basic 帮助文件的上下文 ID，该 ID 与 NumberNumber 属 性对应。说明说明第 32 页除了 numbernumber 之外，所有参数都是可选的。如果使用 RaiseRaise 而不指定一些参数， 并且 ErrErr 对象的属性设置含有未清除的值，则视这些值为错误的值。 RaiseRaise 被用来生成运行时错误，并可用来代替 ErrorError 语句。当书写类模块时要 生成错误，RaiseRaise 是有用的，因为 ErrErr 对象比 ErrorError 语句可能提供更丰富的 信息。例如，用 RaiseRaise 方法，可以在 SourceSource 属性中说明生成错误的来源，可 以引用该错误的联机帮助。 1 1、应用于、应用于 ErrErr 对象对象 2 2、请参阅请参阅 ClearClear 方法、方法、DescriptionDescription 属性、属性、ErrErr 对象、对象、ErrorError 语句、语句、 HelpContextHelpContext 属性、属性、HelpFileHelpFile 属性、属性、LastDLLErrorLastDLLError 属性、属性、NumberNumber 属性、属性、OnOn ErrorError 语句、语句、SourceSource 属性属性Source 属性示例属性示例本示例将某个由 Visual Basic 生成的 Automation 对象之程序设计标识符 （Programmatic ID）存到变量 MyObjectID 中，并在程序使用 RaiseRaise 方法来 生成一错误状态时，将之存入 ErrErr 对象的 SourceSource 属性中。在错误处理过程中， 请不要在程序中使用 SourceSource 属性（或除 NumberNumber 外的 ErrErr 对象属性）。只有 用户不能处理该错误时，才要使用 NumberNumber 以外的属性将详细的