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
结果为:
来源:CSDN
作者:王卫——David
链接:https://blog.csdn.net/wangwei021933/article/details/103463986