在VB中,如何迅速更替地显示正在导入的信息?
具体情况：
从excel导入大量数据时，如何适时显示正在导入的数据信息？
本人直接用一个label对象：
lable.caption="正导入的信息"
在程序运行时，基本上无法显示：仅显示一两个信息而已
请问，在VB里，如何实现导入时，迅速更替地显示正在导入的信息？
比如：
从excel中导入大量有姓名字段的信息，如何在界面上，迅速更替地显示正在导入信息的姓名？？
谢谢！
lable.caption="正导入的信息"
lable.refresh
doevents
加个进度条就可以了, 当然了,进度条的进度得你自己来计算, 比如你一共有10000条记录要导入,那么你可以把进度条最大值设为10000,每导入一条记录进度条就加1, 也可以将进度条最大值设为100,每导入100条记录进度条加1.
如果你的数据量比较大,整个导入的时间比较长,那建议你最好不要用doevents, 因为那只会让导入过程变得更慢.
而因为进度条的响应优先级比较高,所以即使label/text等控件无法响应的时候进度条还是可以正常显示进度的.
貌似每次refresh下？
谢谢大家!!
相关问答：
初学，大胆提问，请高手不吝赐教
1、滚动条点击与绘图板（屏幕,Piceure1）的移动问题已经解决。
Picture1.Top = -VScroll1.Value + bcW '垂直移动
Picture1.Left = -HScroll1.Value + bcW ' ......
为什么我想循环自动发送邮件的时候,就只有第一封能自动发送,其它后面的邮件都只能创建,不能自动发送
Private Sub send_mail_Click() '发送邮件通知
Do While Not TDBG_Dept.EOF
If A> ......
在网上下载了speechsdk51LangPack安装后，用vb可以发音（中文），里面有个girl xiaokun的发音，对中文很好听。但是这个speechsdk51LangPack有100多M，我的vb项目打包后，怎么才可以装到其他机子上也能用？？总不能每 ......
在vb中如何读取Word内容(包含表格，图片，等）
竟然不是zero。
不知道怎么实现的不要说话
这个只能读文本,
VB code:
Private Sub Command1_Click()
Dim WordApp As Object
Set WordApp = CreateObject(& ......
Private Sub btnPrint_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles btnPrint.Click
MouseWait()
Dim ClearTempTabelSQL As String
'If Not ......
