有这个函数会造成主窗口难关掉啊

chen3bing 发布于 2018-12-16 15:00， 1610 次点击

Private Sub SckServer_DataArrival(ByVal bytesTotal As Long)
Dim MyStr As String
Dim a As Long
Dim Encoder(10) As Single
请问高手，有这个函数，网口控件在主窗体，如果关闭的时候正在接收数据，
会不会造成主窗体难关掉啊？要点好几下。
谢谢！

2 回复

suzhanpeng2018-12-16 15:07

应该不是这些造成的。
正在接收数据时，是在执行循环读取和循环写入的过程，如果循环没有执行完毕是很难关闭文件的。
你在循环中加入DoEvents转让一下控制权，或者在循环中加入关闭窗口时跳出循环的命令。

chen3bing2018-12-18 11:15

谢谢！如果不是这些造成的，那可能是什么造成的呢？
我还有一个定时器控件，有定时器程序。会是定时器造成的吗？