• VBScript
  • VBScript 用户手册
    • 什么是 VBScript？
    • 在 HTML 页面中添加 VBScript 代码
    • VBScript基础
      • VBScript 数据类型
      • VBScript 变量
      • VBScript 常数
      • VBScript 运算符
      • 使用条件语句
      • 使用循环语句
      • VBScript 过程
      • VBScript 编码约定
    • Internet Explorer 中的 VBScript
      • VBScript 页面的简单样例
      • VBScript 与窗体
      • 在 VBScript 中使用对象
  • 语言参考
    • VBScript 特性
    • 未包含在 Visual Basic for Applications 中的 VBScript 特性
    • 未包含在 VBScript 中的 Visual Basic for Applications 特性
    • VBScript 常数
      • 颜色常数
      • 比较常数
      • 日期和时间常数
      • 日期格式常数
      • 其他常数
      • MsgBox 常数
      • 字符串常数
      • 三态常数
      • VarType 常数
      • VBScript 常数
    • VBScript 错误
      • VBScript 运行时错误
      • VBScript 语法错误
    • VBScript 事件
      • Initialize 事件
      • Terminate 事件
    • VBScript 函数
      • Abs 函数
      • Array 函数
      • Asc 函数
      • Atn 函数
      • CBool 函数
      • CByte 函数
      • CCur 函数
      • CDate 函数
      • CDbl 函数
      • Chr 函数
      • CInt 函数
      • CLng 函数
      • 转换函数
      • Cos 函数
      • CreateObject 函数
      • CSng 函数
      • CStr 函数
      • Date 函数
      • DateAdd 函数
      • DateDiff 函数
      • DatePart 函数
      • DateSerial 函数
      • DateValue 函数
      • Day 函数
      • 派生数学函数
      • Eval 函数
      • Exp 函数
      • Filter 函数
      • FormatCurrency 函数
      • FormatDateTime 函数
      • FormatNumber 函数
      • FormatPercent 函数
      • GetLocale 函数
      • GetObject 函数
      • GetRef 函数
      • Hex 函数
      • Hour 函数
      • InputBox 函数
      • InStr 函数
      • InStrRev 函数
      • Int、Fix 函数
      • IsArray 函数
      • IsDate 函数
      • IsEmpty 函数
      • IsNull 函数
      • IsNumeric 函数
      • IsObject 函数
      • Join 函数
      • LBound 函数
      • LCase 函数
      • Left 函数
      • Len 函数
      • LoadPicture 函数
      • Log 函数
      • LTrim、RTrim 和 Trim 函数
      • 数学函数
      • Mid 函数
      • Minute 函数
      • Month 函数
      • MonthName 函数
      • MsgBox 函数
      • Now 函数
      • Oct 函数
      • Replace 函数
      • RGB 函数
      • Right 函数
      • Rnd 函数
      • Round 函数
      • ScriptEngine 函数
      • Microsoft(R) Visual Basic(R) Scripting Edition
      • ScriptEngineMajorVersion 函数
      • ScriptEngineMinorVersion 函数
      • Second 函数
      • SetLocale 函数
      • Sgn 函数
      • Sin 函数
      • Space 函数
      • Split 函数
      • Sqr 函数
      • StrComp 函数
      • String 函数
      • StrReverse 函数
      • Tan 函数
      • Time 函数
      • Timer 函数
      • TimeSerial 函数
      • TimeValue 函数
      • TypeName 函数
      • UBound 函数
      • UCase 函数
      • VarType 函数
      • Weekday 函数
      • WeekDayName 函数
      • Year 函数
    • VBScript 关键字
      • Empty
      • False
      • Nothing
      • Null
      • True
    • VBScript 方法
      • Clear 方法
      • Execute 方法
      • Raise 方法
      • Replace 方法
      • Test 方法
    • • 字符集 (0 - 127)
      • 字符集 (128 - 255)
      • 区域设置 ID (LCID) 表
    • VBScript 对象
      • Class 对象
      • Err 对象
      • Match 对象
      • Matches 集合
      • 正则表达式(RegExp)对象
    • VBScript 运算符
      • 运算符(+)
      • And 运算符
      • 算术运算符
      • 赋值运算符
      • 赋值运算符 (=)
      • 比较运算符
      • 连接运算符 (&)
      • 连接运算符
      • 除运算符 (/)
      • Eqv 运算符
      • 幂运算符 (^)
      • Imp 运算符
      • \ 运算符
      • Is 运算符
      • 逻辑运算符
      • Mod 运算符
      • 乘运算符 (*)
      • Not 运算符
      • 运算符优先级
      • 运算符概述
      • Or 运算符
      • 减运算符 (-)
      • Xor 运算符
    • VBScript 属性
      • Description 属性
      • FirstIndex 属性
      • Global 属性
      • HelpContext 属性
      • HelpFile 属性
      • IgnoreCase 属性
      • Length 属性
      • Number 属性
      • Pattern 属性
      • Source 属性
      • Value 属性
    • VBScript 语句
      • Call 语句
      • Class 语句
      • Const 语句
      • Dim 语句
      • Do...Loop 语句
      • Erase 语句
      • Execute 语句
      • ExecuteGlobal 语句
      • Exit 语句
      • For Each...Next 语句
      • For...Next 语句
      • Function 语句
      • If...Then...Else 语句
      • On Error 语句
      • Option Explicit 语句
      • Private 语句
      • Property Get 语句
      • Property Let 语句
      • Property Set 语句
      • Public 语句
      • Randomize 语句
      • ReDim 语句
      • Rem 语句
      • Select Case 语句
      • Set 语句
      • Sub 语句
      • While...Wend 语句
      • With 语句
  • FileSystemObject 用户指南
    • FileSystemObject 对象模型
    • FileSystemObject 和 Scripting 运行时库参考的介绍
    • FileSystemObject 对象
    • 设计 FileSystemObject
    • 处理驱动器和文件夹
    • 处理文件
    • FileSystemObject 示例代码
  • Scripting 运行时库参考
    • Microsoft Scripting 运行时库特性
    • • DriveType 常数
      • 文件属性常数
      • 文件输入/输出常数
      • FileSystemObject 常数
      • SpecialFolder 常数
    • • Add 方法(Dictionary)
      • AddFolders 方法(Folders)
      • BuildPath 方法
      • Close 方法
      • Copy 方法
      • CopyFile 方法
      • CopyFolder 方法
      • CreateFolder 方法
      • CreateTextFile 方法
      • Delete 方法
      • DeleteFile 方法
      • DeleteFolder 方法
      • DriveExists 方法
      • Exists 方法
      • FileExists 方法
      • FolderExists 方法
      • GetAbsolutePathName 方法
      • GetBaseName 方法
      • GetDrive 方法
      • GetDriveName 方法
      • GetExtensionName 方法
      • GetFile 方法
      • GetFileName 方法
      • GetFolder 方法
      • GetParentFolderName 方法
      • GetSpecialFolder 方法
      • GetTempName 方法
      • Items 方法
      • Keys 方法
      • Move 方法
      • MoveFile 方法
      • MoveFolder 方法
      • OpenAsTextStream 方法
      • OpenTextFile 方法
      • Read 方法
      • ReadAll 方法
      • ReadLine 方法
      • Remove 方法
      • Skip 方法
      • SkipLine 方法
      • Write 方法
      • WriteBlankLines 方法
      • WriteLine 方法
    • • Dictionary 对象
      • Drive 对象
      • Drives 集合
      • File 对象
      • Files 集合
      • FileSystemObject 对象
      • Folder 对象
      • Folders 集合
    • • AtEndOfLine 属性
      • AtEndOfStream 属性
      • Attributes 属性
      • AvailableSpace 属性
      • Column 属性
      • CompareMode 属性
      • Count 属性
      • DateCreated 属性
      • DateLastAccessed 属性
      • DateLastModified 属性
      • Drive 属性
      • DriveLetter 属性
      • Drives 属性
      • DriveType 属性
      • Files 属性
      • FileSystem 属性
      • FreeSpace 属性
      • IsReady 属性
      • IsRootFolder 属性
      • Item 属性
      • Key 属性
      • Line 属性
      • Name 属性
      • ParentFolder 属性
      • Path 属性
      • RootFolder 属性
      • SerialNumber 属性
      • ShareName 属性
      • ShortName 属性
      • ShortPath 属性
      • Size 属性
      • SubFolders 属性
      • TotalSize 属性
      • Type 属性
      • VolumeName 属性
  • 正则表达式简介
    • 正则表达式
    • 早期起源
    • 使用正则表达式
    • 正则表达式语法
    • 建立正则表达式
    • 优先权顺序
    • 普通字符
    • 特殊字符
    • 非打印字符
    • 字符匹配
    • 限定符
    • 定位符
    • 选择和编组
    • 后向引用

VBScript编码约定

编码约定是帮助您使用 Microsoft Visual Basic Scripting Edition 编写代码的一些建议。编码约定包含以下内容：

• 对象、变量和过程的命名约定
• 注释约定
• 文本格式和缩进指南

使用一致的编码约定的主要原因是使脚本或脚本集的结构和编码样式标准化，这样代码易于阅读和理解。使用好的编码约定可以使源代码明白、易读、准确，更加直观且与其他语言约定保持一致。

常数命名约定

VBScript 的早期版本不允许创建用户自定义常数。如果要使用常数，则常数以变量的方式实现，且全部字母大写以和其他变量区分。常数名中的多个单词用下划线 (_) 分隔。例如：

 USER_LIST_MAX
NEW_LINE

这种标识常数的方法依旧可行，但您还可以选择其他方案，用 Const 语句创建真正的常数。这个约定使用大小写混合的格式，并以“con”作为常数名的前缀。例如：

 conYourOwnConstant

变量命名约定

为提高易读和一致性，请在 VBScript 代码中使用以下变量命名约定：

子类型	前缀	示例
Boolean	bln	blnFound
Byte	byt	bytRasterData
Date (Time)	dtm	dtmStart
Double	dbl	dblTolerance
Error	err	errOrderNum
Integer	int	intQuantity
Long	lng	lngDistance
Object	obj	objCurrent
Single	sng	sngAverage
String	str	strFirstName

变量作用域

变量应定义在尽量小的作用域中。VBScript 变量的作用域如下所示：

作用域	声明变量处	可见性
过程级	事件、函数或子过程。	在声明变量的过程中可见。
Script 级	HTML 页面的 HEAD 部分，任何过程之外。	在脚本的所有过程中可见。

变量作用域前缀

随着脚本代码长度的增加，有必要快速区分变量的作用域。在类型前缀前面添加一个单字符前缀可以实现这一点，而不致使变量名过长。

作用域	前缀	示例
过程级	无	dblVelocity
Script 级	s	sblnCalcInProgress

描述性变量名和过程名

变量名或过程名的主体应使用大小写混合格式，并且尽量完整地描述其目的。另外，过程名应以动词开始，例如 InitNameArray 或 CloseDialog。

对于经常使用的或较长的名称，推荐使用标准缩写以使名称保持在适当的长度内。通常多于 32 个字符的变量名会变得难以阅读。使用缩写时，应确保在整个脚本中保持一致。例如，在一个脚本或脚本集中随意切换 Cnt 和 Count 将造成混乱。

对象命名约定

下表列出了 VBScript 中可能用到的对象命名约定（推荐）：

对象类型	前缀	示例
3D 面板	pnl	pnlGroup
动画按钮	ani	aniMailBox
复选框	chk	chkReadOnly
组合框、下拉列表框	cbo	cboEnglish
命令按钮	cmd	cmdExit
公共对话框	dlg	dlgFileOpen
框架	fra	fraLanguage
水平滚动条	hsb	hsbVolume
图像	img	imgIcon
标签	lbl	lblHelpMessage
直线	lin	linVertical
列表框	lst	lstPolicyCodes
旋钮	spn	spnPages
文本框	txt	txtLastName
垂直滚动条	vsb	vsbRate
滑块	sld	sldScale

代码注释约定

所有过程的开始部分都应有描述其功能的简要注释。这些注释并不描述细节信息（如何实现功能），这是因为细节有时要频繁更改。这样就可以避免不必要的注释维护工作以及错误的注释。细节信息由代码本身及必要的内部注释来描述。

当传递给过程的参数的用途不明显，或过程对参数的取值范围有要求时，应加以说明。如果过程改变了函数和变量的返回值（特别是通过参数引用来改变），也应在过程的开始部分描述该返回值。

过程开始部分的注释应包含以下区段标题。相关样例，请参阅后面的“格式化代码”部分。

区段标题	注释内容
目的	过程的功能（不是实现功能的方法）。
假设	其状态影响此过程的外部变量、控件或其他元素的列表。
效果	过程对每个外部变量、控件或其他元素的影响效果的列表。
输入	每个目的不明显的参数的解释。每个参数都应占据单独一行并有其内部注释。
返回	返回值的解释。

请记住以下几点：

• 每个重要的变量声明都应有内部注释，描述变量的用途。
• 应清楚地命名变量、控件和过程，仅在说明复杂细节时需要内部注释。
• 应在脚本的开始部分包含描述该脚本的概述，列举对象、过程、运算法则、对话框和其他系统从属物。有时一段描述运算法则的假码是很有用的。

格式化代码

应尽可能多地保留屏幕空间，但仍允许用代码格式反映逻辑结构和嵌套。以下为几点提示：

• 标准嵌套块应缩进 4 个空格。
• 过程的概述注释应缩进 1 个空格。
• 概述注释后的最高层语句应缩进 4 个空格，每一层嵌套块再缩进 4 个空格。例如：

'*********************************************************
' Purpose: Locates the first occurrence of a specified user
'          in the UserList array.
' Inputs: strUserList(): the list of users to be searched.
'         strTargetUser: the name of the user to search for.
' Returns: The index of the first occurrence of the strTargetUser
'          in the strUserList array.
'          If the target user is not found, return -1.
'*********************************************************
Function intFindUser (strUserList(), strTargetUser)
   Dim i   ' Loop counter.
   Dim blnFound   ' Target found flag
   intFindUser =-1
   i =0   ' Initialize loop counter
   Do While i <=Ubound(strUserList) and Not blnFound
      If strUserList(i) =strTargetUser Then
         blnFound =True   ' Set flag to True
         intFindUser =i   ' Set return value to loop count
      End If
      i =i + 1   ' Increment loop counter
   Loop
End Function