Imports System.Net Namespace Network Friend Class ServerSocket Friend Function Recv(buffer As Byte()) As Integer System.IO.Read(buffer) End Function 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 Listen() ' modified on src ' do the listen on a port ' and whatever it is needed ' to listen 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