vb.net线程挂起 vb6 线程

VB与VB.NET串口及以太网通迅

关于串口通讯的问题：

很明显，你还不知道（不会、不习惯）使用事件驱动的方式接收数据。

建议你仔细看看串口组件（无论VB6还是VB.net）的OnComm事件，你的问题很容易解决。

关于以太网通讯：

在TCP通讯中端口确实可以重用，你百度一下“TCP端口重用”能查到很多示例。

但绝大多数情况下不推荐端口重用，而应该采取服务器端建立连接池的方法。

或者，干脆不用TCP，用UDP解决也可以。

相关问答

Q1: 求大神指导VB.net 线程 ThreadState 的使用方法 怎么获取线程状态,是否被挂起堵塞停止等等

用time控件啊，获取threadstate后，按指定时间间隔规定向界面刷新，线程必须是全局变量

用一个有退出条件的无限循环的sub也行。

线程开始就触发该过程，用无限循环来刷新状态，线程完成即退出无限循环。局部变量的线程也可以用这种方式。

不过用法要正确，否则会出问题。

Q2: VB.net 多线程，导致无法响应

用

t.Suspend() 这个是挂起线程。是一个异步方法。

t.Sleep 我看了是一个同步方法。要等这个方法运行完了才继续下一步。

这和from.show和 from.showdiaglog区别差不多！

至于疑问2我也没找到原因。

Q3: 请教，vb.net多线程读写文件的问题

你可以在timer前用if判断网络状态vb.net线程挂起，

如断开，可用

threading.Thread.Sleep（10000） ‘当前线程挂起10秒

’可以开一个新线程去读取脱机数据。

如连接，则继续执行。

补充：

dim i as integer

'超过100次退出，避免死循环

for i=0 to 100

try

'ping你vb.net线程挂起的端口

if ‘ok

exit for

else

threading.Thread.Sleep（10000） ‘当前线程挂起10秒

end

Catch ex As Exception

End Try

next

Q4: vb.net 中我现实现,线程的暂停与开始!请教高手一下!请留下你的联系方式!

在你给textbox设置text值后直接使用sleep()，因为在使用sleep（）的时候，当前的主进程是被挂起了，也就是说设置的text属性后，还来不及在屏幕上显示lbi的内容就执行了sleep，所以在执行sleep()挂起主进程前，你必须让textbox的内容先显示出来再执行sleep，可尝试使用下DoEvents（）将控制权暂时移交一下，让系统有时机来刷新textbox里面的内容，让系统有机会来刷新textbox里面的内容。由于我没有安装visual studio的开发环境，无法调试代码的正确性，但我记得我以前也遇到此类问题，采取的DoEvents()的方式。你可尝试下。

lbl.Visible = True

Sleep(5000)

lbl.Text = "我是中国人"

lbi.Refresh '刷新一下lbi，具体你可以调试下，看需要不需要这条

Application.DoEvents() ‘设置完lbi的text属性，将操作权限释放一下，让系统有机会显示lbi的内容。

Sleep(3000) ’待显示后，再执行挂起

lbl.Text = "我爱自己的祖国"

lbi.Refresh ‘同上

Application.DoEvents() ’同上

DoEvents（）的功能解释是：转让控制权，以便让操作系统处理其它的事件。

如执行一次不行，可尝试重复多执行几次，特别在循环语句中，对于窗口的刷新显示DoEvents特别有用，但是在循环体内使用了DoEvents后，当前进程的执行效率会有大幅降低，因为移交控制权必然损失当前进程的运行效率。

Q5: VB.net多线程编程问题

你可以在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

vb.net线程挂起的介绍就聊到这里吧，感谢你花时间阅读本站内容，更多关于vb6 线程、vb.net线程挂起的信息别忘了在本站进行查找喔。