Imports System.Net.Sockets
Imports System.Text

Module Module1

Sub Main()
  Dim serverSocket As New TcpListener(System.Net.IPAddress.Parse("192.168.1.100"), 8888)
End Sub

End Module