BUG: "On Error Resume Next" Enters Infinite Loop in Native Code
Article ID: 193036
Article Last Modified on 5/12/2003
APPLIES TO
- Microsoft Visual Basic 5.0 Learning Edition
- Microsoft Visual Basic 6.0 Learning Edition
- Microsoft Visual Basic 5.0 Professional Edition
- Microsoft Visual Basic 6.0 Professional Edition
- Microsoft Visual Basic 5.0 Enterprise Edition
- Microsoft Visual Basic 6.0 Enterprise Edition
This article was previously published under Q193036
SYMPTOMS
After compiling to native code, a Visual Basic application using "On Error
Resume Next" together with a For loop may sometimes enter an infinite loop
when running as a standalone executable.
RESOLUTION
To work around this behavior, the code can be restructured. The code
provided below resolves the problem for the code that reproduces this bug
in the "Steps To Reproduce Behavior" section of this article:
Public Sub Form_Load()
On Error Resume Next
Dim x As Integer
Dim z as integer
Dim mArray as Variant
z = UBound(mArray)
For x = 0 To z
MsgBox "clear"
Next x
End Sub
STATUS
Microsoft has confirmed this to be a bug in the Microsoft products listed
at the beginning of this article.
Keywords: kbbug kbpending kbcompiler KB193036