怎样知道执行某个子程序or函数or窗体需要多长时间,并且用进度栏显示!