论坛: 原创软件 标题: 大侠不能小看的问题！ 复制本贴地址    
作者: kikiny [kikiny]    论坛用户   登录
Option Explicit

Dim i As Single
Dim ii As Double

Private Sub Command1_Click()
ii = 0
For i = 0 To 555
ii = ii + i
Label1.Caption = ii
Next i
End Sub
请问各位高手，如果i的值比较大时（比如i需要运行1分钟），为什么Label1.Caption值不能随着i的什变化而变化呢（不能用其他控件替代Label)？如果哪位大侠能指点迷津，我愿送一张帅照。怎么心动了吧！！哈哈……



[此贴被 坐标男孩(kikiny) 在 9月4日16时54分 编辑过]


[此贴被 坐标男孩(kikiny) 在 9月4日16时25分 编辑过]

地主 发表时间: 9/4 16:51
回复: ricky [ricky]   版主   登录
1分钟后就变化了

B1层 发表时间: 09/04 19:53
回复: kikiny [kikiny]   论坛用户   登录
说了也没算没说，谁不知道一分钟后有变化，但他不能随着i的变化而变化。

B2层 发表时间: 09/04 21:20
回复: ricky [ricky]   版主   登录
vb好久不玩了。不过好像印象中有一个刷新的REFRESH的属性

B3层 发表时间: 09/04 21:29
回复: ricky [ricky]   版主   登录
Option Explicit

Dim i As Single
Dim ii As Double

Private Sub Command1_Click()
ii = 0
For i = 0 To 555
ii = ii + i
Label1.Caption = ii
;加一个
Label1.Refresh
Next i
End Sub

你试一下


B4层 发表时间: 09/04 21:31
回复: kikiny [kikiny]   论坛用户   登录
谢谢大侠。

B5层 发表时间: 09/05 12:21

论坛: 原创软件

20CN网络安全小组版权所有
Copyright © 2000-2010 20CN Security Group. All Rights Reserved.
论坛程序编写：NetDemon

粤ICP备05087286号