VB.Net TCP не может подключиться к сокету при локальном подключении

Question

У меня проблема с установлением соединения с моим TcpClient с использованием адреса локального сервера 127.0.0.1 и порта 1000.Он пытается установить соединение, а затем нажимает Catch SocketException, что он не может найти сервер.

Я установил точки останова и прошел строку кода построчно, и он ловит мое исключение, как только строка NetStream = Client.GetStream() вызывается из моего Try/Catch после нажатия моей кнопки btnStart.Показывает, что соединение не устанавливается вообще.Почему это так?

Public Class frmForm1

    Dim Client As TcpClient 
    Dim connection As Socket 
    Dim NetStream As NetworkStream 

Private Sub btnStartClient_Click(sender As Object, e As EventArgs) Handles btnStartClient.Click

    Try

        txtLog.Text &= "Attempting to connect" 

        Client = New TcpClient()
        Client.Connect(txtAddress.Text, CInt(txtPort.Text))

        NetStream = Client.GetStream() 


    ' Catch errors in trying to connect to server
    Catch SocketEx As SocketException
        txtLog.Text &= "Cannot find server" 
    End Try

End Sub

Не следует вызывать мое исключение, а затем создавать объекты NetworkStream Reader / Writer и печатать, что они были созданы.А также настройка потока прослушивания.Однако я даже не могу зайти так далеко, как мой Catch SocketException вызывается на линии NetStream = Client.GetStream()

Answer 1

Вам нужно как минимум 2 темы.Один для сервера для прослушивания и один для клиники для подключения.Обязательно вызовите .Start() для объекта TcpListener (Server.Start() в вашем случае), прежде чем пытаться подключить клиента к серверу.