小弟我希望在点击按键时出现提示“请稍候.”，这该如何做呀

我希望在点击按键时出现提示“请稍候...”，这该怎么做呀？
我新建了一个无边框窗体来显示“请稍候...”的提示，可我的后台操作语句该放在什么位置呀？或者说这个无边框窗体该如何显示呀？

[解决办法]
private sub aaa
dim a as frm
a.show
System.Windows.Forms.Application.DoEvents()

===========
这里写执行代码，
===========

a.close
a.dispose
end sub