以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  关于ip端口System.Net.Sockets.TcpClient  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=171322)

--  作者:tcmhl
--  发布时间:2021/8/26 10:45:00
--  关于ip端口System.Net.Sockets.TcpClient
请问我需要测试其他机器的端口是否在线 ,用以下这种方式如果不在线的话,会有响应时间导致软件卡住,请问一下这个响应时间是否可以设置,谢谢!

Dim seip As WinForm.ComboBox = e.Form.Controls("txtIP")
Dim secode As WinForm.NumericComboBox = e.Form.Controls("txtPort")
Dim btn As WinForm.Button = e.Form.Controls("Button5")
btn.Text="连接中.."
If seip.text<>"" And secode.value<>0 Then
    try
        Dim tcp As New System.Net.Sockets.TcpClient
        tcp.connect(seip.text, secode.value)
        btn.Text="成功!"
     catch ex As exception
        btn.Text="失败!"
    End try
End If

--  作者:有点蓝
--  发布时间:2021/8/26 10:53:00
--  
看了一下微软的文档,没有这个超时设置

https://docs.microsoft.com/zh-cn/dotnet/api/system.net.sockets.tcpclient.connect?view=netframework-4.0