Kaydet (Commit) fdd3941a authored tarafından Jean-Pierre Ledure's avatar Jean-Pierre Ledure

Access2Base - Bypass Basic IDE shortcoming

When using an If statement with a continuation character
after Then, sometimes breakpoints are desynchronized.
Suppress continuation character and add an explicit End If
üst 5ca8203a
......@@ -365,8 +365,9 @@ Const cstProgressMeterLimit = 100
oOutput._EditMode = dbEditNone
lInputRecs = lInputRecs + 1
If bProgressMeter Then
If lInputRecs Mod (lInputMax / 100) = 0 Then _
If lInputRecs Mod (lInputMax / 100) = 0 Then
Application.SysCmd acSysCmdUpdateMeter, pvNewName & " " & CStr(CLng(lInputRecs * 100 / lInputMax)) & "%", lInputRecs
End If
End If
.MoveNext
Loop
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment