为了减少代码改动量，可以把原始的Timer控件都设置

Timer1.Enabled = False

然后用多线程DLL中的Timer，执行：

Call Timer1_Timer()

此DLL的文章《VB6 调用带Winsock的DLL的demo，把容易堵塞的Winsock放到多线程去就不影响主程序了，不公布DLL》