long ll_i,ll_rowcount
ll_rowcount = dw_1.rowcount( )
if ll_rowcount <= 0 then return
SetPointer(HourGlass!) //鼠标变成沙漏状
//w_sys_tip为进度条窗口,里面只需添加文本和进度条空间,无需写如何代码,最大化按钮去掉。
Open(w_sys_tip)
//打开进度条窗口
w_sys_tip.st_info.text = '系统正在比对上月数据,请耐心等候...'
//进度条窗口文本显示
w_sys_tip.hpb_bar.MaxPosition = ll_rowcount + 1
//进度条窗口中进度条的最大值
for ll_i = 1 to ll_rowcount
//执行循环的代码
//
if w_sys_tip.hpb_bar.Position <= ll_rowcount then
//设置进度条自动增长。
w_sys_tip.hpb_bar.Position = w_sys_tip.hpb_bar.Position + 1
end if
next
SetPointer(Arrow!)
//鼠标还原为小箭头。
Close(w_sys_tip) //关闭进度条。