为什么没有及时显示？

我有一段程序，是从数据库中进行查询，但较费时，我想在状态栏中显示“正在查询，请稍候”，  
  private   sub   cmd_chick()  
      stbar.text="正在查询，请稍候"  
      以下为一段较费时的查询语句  
      .......  
      stbar.text="查询结束"  
  end   sub  
  但直到查询结束状态栏才显示“正在查询，请稍候”,请各位帮助，有没有好的方法，多线程暂不考虑(主要考虑稳定性)。 问题点数：100、回复次数：2Top

1 楼pigpag（Pigpag - A GRE Fighter）回复于 2003-10-01 15:05:37 得分 80

没有加DoEvents!  
  private   sub   cmd_chick()  
      stbar.text="正在查询，请稍候"  
      DoEvents  
      以下为一段较费时的查询语句  
      .......  
      stbar.text="查询结束"  
  end   sub  
  Top

2 楼rainstormmaster（暴风雨 v2.0）回复于 2003-10-01 15:05:40 得分 20

在   stbar.text="正在查询，请稍候"   后紧接一句：  
  stbar.RefreshTop

相关问题

• 查询
• 语句
• stbar
• 状态栏
• 显示
• chick
• 请稍候
• doevents
• 结束
• 费时的查询语句

• 帖主：DTWUJP
• pigpag
• rainstormmaster

• Visual Basic类图书
• Visual Basic类源码下载