On Error xxx一般顶格写，还是和其它代码一样前面缩进??

Question

On error goto ....还是
    On Error goto ...

Answer 1

为了阅读省事，还是规范写的好。一般与上一曾缩进4格（一个Tbb就解决了）。编码共通式样:1.命名规则
（1）FORM命名
frm_Xxxx
（2）字段命名
无特殊规定
（3）对象
a）控件
种类 前缀 例
命令按钮 cmd cmdEnd
文本框 txt txtGhsName
检查框 chk chkKey
选择框 opt optBj
复合框 cbo cboDc
标签 lbl lblHj
组合框 fra fraZj
图片 pic picLogo
状态条 stb stbStatus
进度条 pgb pgbJd
Spread spr sprMx
b）SQL对象
Connection oraCnt
 Session      oraSsn
 Database      oraDb
 Dynaset      oraDyn
 Command oraCom
 Recordset oraRec
 Field oraFld
 Parameter oraPrm
 Fields oraFlds
 Parameters oraPrms
c）ADO对象
 Connection ocn ocnWZGL
 Recordset ors orsWZGL
 Command ocmd ocmdWZGL （4）常量，变量，函数
a）适用范围
·尽量避免使用全程变量。不得已要使用时，在Public.bas定义。 ·from间的数据交换，在from追加属性。
·适用范围的前缀
适用范围 前缀 例
全局 g gsUserId
模块内 m mbDataZh
过程内 无前缀 sSql
b）常量
·有相应常量时尽量避免直接使用常数。
·常量名全用大写。
·尽量避免在过程内定义常量。
·适用范围的前缀
适用范围 前缀 例
全局 G＿ G＿Name
模块内 M＿ M＿Note
过程内 CONST＿ CONST＿OK
c）变量
·变量必须显式定义。
·数据类型的前缀
数据类型 前缀 例
布尔型 b bRet
字符串型 s sSql
整数型 i iIndex
长整数型 l lRet
单精度浮点小数型 sng sngAverage
双精度浮点小数型 dbl dblCount
货币型 cur curSum
日期型 dtm dtmYmd
对象型 o oBuhin
Variant型 v vOption
d）函数
·返回值：为了区别过程和函数，函数的返回值变量名用数据类型作前缀。
·函数名：函数名由名词+动词组合而成，而过程名仅用名词。
·模块内的函数必须用Private描述。
·参数必须用ByVal，仅在函数内变更时用ByRef。
例如:
Public Sub gFormLoad
Public Function   giMsgDisp，gsNewDenNo
Private Sub FormEdit
Private Function  bDataCheck （5）工作表
w+原表名2 编程规则 （1）格式要求
采用缩进排列（按层后退4位）。 （2）注释
a）采用中文注释。
b）函数前必须加注释。注释内容包括：
·函数名
·功能名
·返回值说明
·参数说明
·功能说明
·备注
c）程序中较复杂的处理过程、循环体、条件体中酌情加注释。
d）每个表、数组、变量的定义前必须加注释。
e) 重要的变量定义必须加上注释。
　　　　f) 在源代码最开始位置记载该画面名称，功能及修正履历。