作者jwjeng (阿吉仔)
看板Visual_Basic
标题[.NET] 请问在回圈中显示资料的问题
时间Wed Apr 28 00:00:25 2010
不好意思，小弟又来问问题了
由於执行一个很大的回圈
我想在过程中显示现在执行到第几笔资料
因此做了类似这样的设定
FileOpen(1, "d:\VB\data.txt", OpenMode.Input)
Do Until EOF(1)
I += 1
TextBox1.Text = "目前执行第 " & I & vb "笔资料"
.... 其他指令 ....
Loop
FileClose(1)
结果发现
他并不会在程式执行过程中显示第几笔
而是到全部执行完毕才显示出来
因此在我按了开始後
程式就愣在那边不知是死是活
最後才出现最後一笔的讯息
但那已经没有意义了
也有想过是不是因为程式执行太快来不及显示出来
因此改成每100笔或1000笔显示一次
结果还是一样
甚至加入timer事件
在按下开始到结束为止
那个时钟也是不会动的
不知该怎麽改进呢?
恳请赐教
--
为了你的健康及嫂夫人的幸福
每日起床後、临睡前, 请做:
仰卧起坐十次
正拳伏地挺身十次
交互蹲跳二十次
见到此post, 请立刻离座, 执行上述动作之一!
--
※ 发信站: 批踢踢实业坊(ptt.cc)
◆ From: 125.231.215.215
1F：推 horngsh:请在回圈中加Application.DoEvents() 04/28 01:04
2F：→ jwjeng:解决了，感恩 04/28 09:02