对象类型 | |
3D 面板 | |
动画按钮 | |
复选框 | |
组合框、下拉列表框 | |
命令按钮 | |
公共对话框 | |
框架 | |
水平滚动条 | |
图像 | |
标签 | |
直线 | |
列表框 | |
旋钮 | |
文本框 | |
垂直滚动条 | |
滑块 ,这是因为细节有时要频繁更改。这样就可以避免不必要的注释维护工作以及错误的注释。细节信息由代码本身及必要的内部注释来描述。 当传递给过程的参数的用途不明显,或过程对参数的取值范围有要求时,应加以说明。如果过程改变了函数和变量的返回值(特别是通过参数引用来改变),也应在过程的开始部分描述该返回值。 过程开始部分的注释应包含以下区段标题。相关样例,请参阅后面的“格式化代码”部分。
请记住以下几点: ·每个重要的变量声明都应有内部注释,描述变量的用途。 ·应清楚地命名变量、控件和过程,仅在说明复杂细节时需要内部注释。 ·应在 Script 的开始部分包含描述该 Script 的概述,列举对象、过程、运算法则、对话框和其他系统从属物。有时一段描述运算法则的假码是很有用的。 格式化代码 应尽可能多地保留屏空间,但仍允许用代码格式反映逻辑结构和嵌套。以下为几点提示: ·标准嵌套块应缩进 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 |
转载于:https://blog.51cto.com/jianchi1825/136589