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
结果为:在这里插入图片描述

发布了35 篇原创文章 · 获赞 1 · 访问量 1万+

猜你喜欢

转载自blog.csdn.net/wangwei021933/article/details/103463986