求查询问题。

Question

问题一
如何显示‘正在查询，请稍后’，查询结果出来后此框自动消失
问题二
进行再次查询时怎样删除上次查询留在TEXT里的信息。
多谢！

Answer 1

Label1.Caption="正在查询，请稍后……"
Set Rst=DBCn.Execute("Select * From T_Sometable")
Label1.Caption="查询完成!"

Answer 2

问题一解答：
你在查询前呢，调用一个窗体，在这个船体上放一个LABLE，然它显示“正在查询，请稍候”
然后调用查询语句，查询结束后呢，关闭此窗体
问题二解答：
再次查询时，你清空TEXT里的信息，如text1.text=""，然后调用问题一解答

Answer 3

rsd 应该是他定义的记录集
dim rsd as recordset
set rsd =new recordset