【发布时间】:2018-08-06 04:53:57
【问题描述】:
如何检查该函数之前是否定义了 TcpClient? 我正在使用一个 Sub 打开一个连接和一个计时器来检查连接是否仍然存在(使用相同的 Sub!)。
Public clientTest as TcpClient = nothing
Sub OpenCheckConnection()
If clientTest is not Nothing AndAlso clientTest.Connected = True Then
pictureboxTest.Image = xxGreen
Else
clientTest = New TcpClient
Try
clientTest.Connect(IPtest, Porttest)
Catch ex As Exception
NewLog(ex.ToString)
End Try
'
If clientTest.Connected = True Then
(...) '
Else
pictureboxTest.Image = xxRed
End If
End If
End Sub
我已经对此进行了测试,并且没有为 TcpClient 定义 clientTest is not Nothing。 "clientTest <> 0 也没有定义。
我该如何管理?
【问题讨论】: