关于显示进度的问题，请教大虾

Question

这个不是你程序的问题。这个是VB的BUG。我也遇到过这个问题。
这个方法或许可以解决你的问题。你使用setfocus命令在每次sqlruning更新前执行一次。这样在有些机器上，可以不再出现上述情况，而把真实的数据显示出来。

Answer 1

这个问题不是你程序的问题。我也遇到过，是VB的BUG。
如果你在每次更新sqlruning的时候都setfocus一下，那么或许可以不出现白框，而把真实数据显示出来。

Answer 2

加个DoEventsPublic Sub GoOn(ShowMsg As String, Optional detailPercent As Long = -1)
    Form1.SqlRuning.Caption = ShowMsg       '标签显示的内容
    
    If Not IsMissing(detailPercent) And detailPercent >= 0 Then     '进度条
        Form1.RunBar.Value = detailPercent
    Else
        Form1.RunBar.Value = 0
    End If
    
    DoEventsEnd Sub

Answer 3

楼上的说得对
================================================================
★★ chen_cyh(を愛た) ●  

Answer 4

楼上说得对
================================================================
★★ chen_cyh(を愛た) ●