涉及到异步模式的编程,vb高手进!

我有这么个需求用户打开界面显示一条记录的详细信息, 所有的内容都显示出来了，但后台要继续执行一段代码(可能需要耗费10多秒,判断网络是否接通,是否有最新的文件,如果有则自动执行网络文件下载)我是这么处理的sub Form_Load()
    '初始化并显示信息
     ....
  
    '开始Timer记时,1秒以后开始执行后台工作
    '否则一直要到后台工作执行完,界面才会完全显示
    Timer1.InterVal=1000
    Timer1.Enable=true
end subSub Timer1_Timer()
    '执行网络文件下载
    '该过程可能会持续10秒
    DownLoadFile(RecordNo)   'RecordNo为该详细信息记录对应的ID
    '确保只执行一次后台工作
    Timer1.Enable = false
End Sub以上处理可以正常工作,但是碰到下面一个问题,用户打开界面以后,如果马上点击关闭按纽要10多秒以后才能响应(后台在执行文件下载)----有没有什么办法让用户可以马上关闭界面,但是DownLoadFile(RecordNo)继续执行结束