vb疑问“On Error Resume Next ”怎么解释

来源:百度知道 编辑:UC知道 时间:2024/05/08 21:42:04
Dim i As Integer
Private Sub Command1_Click()
On Error Resume Next
i = i + 1
Load Text1(i)
Text1(i).Left = Text1(0).Left
Text1(i).Visible = True
Text1(i).Top = Text1(i - 1).Top + Text1(i - 1).Height + 50
End Sub

Private Sub Command2_Click()
On Error Resume Next
Text1(i).Visible = False
If i = -1 Then Exit Sub
i = i - 1
End Sub

在VB中这个“On Error Resume Next ”怎么解释

如果出现错误,就跳过,执行下面的语句,即当你出错的那句是不存在的。
On Error ** 还有别的用法,如On Error goto 10
如果出错就跳到第10 行

当某语句出现错误时,跳过它,执行下面一行的代码..