How to connect Socket with Websocket?

Question

Maybe the title is a bit silly, but I’ll explain, I have a Server Socket that I did in VB and I also have a Client Socket made in Javascript for web, only problem is that for Client(Web) understand that the connection established is necessary that the server return 101, otherwise:

it stays in "Pending" until we disconnect, still do not know how to make the server return this, Someone could explain how to do?

It was already a bit boring to develop the server in Visual Basic because the examples I found on the internet were very simple, my code also rsrs

Imports System.Net.Sockets
Imports System.IO
Imports System.Threading
Imports System.Net

Module Principal
    Dim ServerIP As IPAddress = IPAddress.Parse("192.168.0.3")
    Dim Server As New TcpListener(ServerIP, 80)
    Dim Client As New TcpClient
    Dim Reader As StreamReader
    Dim Writer As StreamWriter

    Sub Main()
        Server.Start()
        Client = Server.AcceptTcpClient
        Dim Thread As New Thread(AddressOf Receive)
        Thread.Start()
        While Client.Connected
            Dim m = Console.ReadLine
            If Len(m) Then
                Writer = New StreamWriter(Client.GetStream)
                Writer.WriteLine(m)
                Writer.Flush()
            End If
        End While
    End Sub
    Sub Receive()
        While Client.Connected
            Reader = New StreamReader(Client.GetStream)
            Dim Received = Reader.ReadLine
            If Len(Received) Then
                Console.WriteLine(Received)
            End If
        End While
        Main()
    End Sub


End Module

Well, if anyone can help I’d really appreciate it.