End Sub 和 Exit Sub 的区别

End Sub：表示一个过程结束的代码，每一个Sub中都包含一个End Sub。

Exit Sub：表示带过程中执行代码时，选择性退出。不执行Exit Sub之后的代码

Private Sub Form_Load()

Dim a As Integer

a = 1

Label1.Caption = a

Exit Sub

Label2.Caption = a

End Sub

结果为：

当注释掉Exit sub时

例：

Private Sub Form_Load()

Dim a As Integer

a = 1

Label1.Caption = a

'Exit Sub 被注释代码

Label2.Caption = a

End Sub
结果为：