Imports System.Net Namespace Network Friend Class ServerSocket Friend Function Recv(buffer As Byte()) As Integer System.IO.Read(buffer) End Function Friend Sub Listen() ' do the listen on a port ' and whatever it is needed ' to listen End Sub End Class Friend Class ClientSocket Friend Function Send(buffer As Byte()) As Integer ' modified on dst System.IO.Write(buffer) ' modified on dst End Function Friend Sub ConnectTo(addr As String) ' connect to a client Net.ConnectTo(addr) End Sub End Class Friend Class DNS Friend Function GetHostByName(addr As String) As String ' this method returns the host ' when you give an addr Return CalculateHostByName(addr) End Function End Class End Namespace