我想在text文本框中快速显示从1至100
如下:
sub command1_click()
dim i as integer
for i=1 to 100
text1.text=str(i)
delay(1000) '用于延时
next i
end sub
执行过程中text文本框直接显示100,我增加延时也不行。
不知错在哪里,请各位大侠指教!
...全文
1704打赏收藏
我想在text文本框中快速显示1至100
我想在text文本框中快速显示从1至100 如下: sub command1_click() dim i as integer for i=1 to 100 text1.text=str(i) delay(1000) '用于延时 next i end sub 执行过程中text文本框直接显示100,我增加延时也不行。 不知错在哪里,请各位大侠指教!