Sock.IP = "10.20.30.4"


    Sock.IPSockReader(1).Terminal = 1
    Sock.IPSockReader(1).AutoDetect = True

    Sock.IPSockReader(2).Terminal = 2
    Sock.IPSockReader(2).AutoDetect = True

    Sock.PolingMS = 1



    Sock.PollingON()


    ' '' ''If monOsitrack.OsitrackStations(n).tagPresent = True Then
    Sock.IPSock(2).readed(True)

    TextBox1.Text = Sock.IPSock(2).DataReaded(0, True)
    TextBox2.Text = Sock.IPSock(2).DataReaded(1, True)
    TextBox3.Text = Sock.IPSock(2).DataReaded(2, True)
    TextBox4.Text = Sock.IPSock(2).DataReaded(3, True)
    TextBox5.Text = Sock.IPSock(2).DataReaded(4, True)

    Sock.PollingOFF()

Public Sock As New SockClass.IPSock