求助: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
http://www.foxtable.com/webhelp/topics/1476.htm
lb.text="时间" & i & "当前值 " & value
Application.DoEvents