VBScript编码规范

格式化代码

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

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

 '********************************************************* ' 目的：    返回指定用户在 UserList 数组中第一次出现的位置。 ' 输入：    strUserList():   所查找的用户列表。 '           strTargetUser:   要查找的用户名。 ' 返回：    strTargetUser 在 strUserList 数组中第一次出现时的索引。 '           如果目标用户未找到，返回 -1。 '********************************************************* Function intFindUser (strUserList(), strTargetUser)     Dim i                     ' 循环计数器。     Dim blnFound       ' 发现目标的标记。     intFindUser = -1     i = 0                     ' 初始化循环计数器。     Do While i <= Ubound(strUserList) and Not blnFound         If strUserList(i) = strTargetUser Then              blnFound = True   ' 标记设为 True。             intFindUser = i   ' 返回值设为循环计数器。         End If         i = i + 1             ' 循环计数器加 1。     Loop End Function