用time控件啊，获取threadstate后，按指定时间间隔规定向界面刷新，线程必须是全局变量
富宁网站建设公司创新互联,富宁网站设计制作，有大型网站制作公司丰富经验。已为富宁近1000家提供企业网站建设服务。企业网站搭建\成都外贸网站建设要多少钱，请找那个售后服务好的富宁做网站的公司定做！
用一个有退出条件的无限循环的sub也行。
线程开始就触发该过程，用无限循环来刷新状态，线程完成即退出无限循环。局部变量的线程也可以用这种方式。
不过用法要正确，否则会出问题。
你可以在timer前用if判断网络状态，
如断开，可用
threading.Thread.Sleep（10000） ‘当前线程挂起10秒
’可以开一个新线程去读取脱机数据。
如连接，则继续执行。
补充：
dim i as integer
'超过100次退出，避免死循环
for i=0 to 100
try
'ping你的端口
if ‘ok
exit for
else
threading.Thread.Sleep（10000） ‘当前线程挂起10秒
end
Catch ex As Exception
End Try
next
用
t.Suspend() 这个是挂起线程。是一个异步方法。
t.Sleep 我看了是一个同步方法。要等这个方法运行完了才继续下一步。
这和from.show和 from.showdiaglog区别差不多！
至于疑问2我也没找到原因。
