- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- for循环 lable 的text值不刷新 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=188278)
-- 发布时间：2023/9/12 8:50:00
-- for循环 lable 的text值不刷新
求助：for 循环里更新 lable 的text，需要用什么函数？
以下代码：只能显示for循环后，最后一个值
Dim lb As WinForm.Label = e.Form.Controls("Label1")
Dim value As String
Dim i As Integer
For i =1 To 10
value=i
lb.text="时间" & i & "当前值 " & value
\'If value > 0 Then
\'\'MessageBox.show(value )
\'\'Exit For
\'End If
Threading.Thread.Sleep(1000)
Next
-- 发布时间：2023/9/12 9:34:00
--
http://www.foxtable.com/webhelp/topics/1476.htm
lb.text="时间" & i & "当前值 " & value
Application.DoEvents