1、过程
Public|Private Sub 过程名(形参, ...)
...
End Sub
注：Exit Sub强制退出过程
2、函数
Public|Private Function 函数名(形参, ...) As 返回数据类型
...
函数名=返回值
End Function
注：Exit Function强制退出函数
3、类模块
Private 变量名 As 数据类型
Property Get 属性名() As 属性类型
属性名=变量名
End Property
Property Let 属性名（ByVal 形参名 As 数据类型）
变量名＝形参名
End Property
Property Set 属性名（ByVal 形参名 As 数据类型）
...
End Property
4、异常处理
On Error GoTo 标签
...
Exit Sub
标签:
...
Err.clear
免责声明：本站发布的内容（图片、视频和文字）以原创、转载和分享为主，文章观点不代表本网站立场，如果涉及侵权请联系站长邮箱：is@yisu.com进行举报，并提供相关证据，一经查实，将立刻删除涉嫌侵权内容。
