Kompileringsfejl ved client/server applikation

Læste lige http://eksperten.dk/spm/526463
Jeg kopierede denne kode:
Client:

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

Class Client
    Public Shared Sub Main(ByVal args As String())
        ' connect til localhost port 1234
        Dim client As TcpClient = New TcpClient ("localhost", 1234)
        ' hent writer og reader til at skrive og læse med
        Dim wrt As StreamWriter = New StreamWriter (client.GetStream)
        Dim rdr As StreamReader = New StreamReader (client.GetStream)
        Dim outmsg As String
        Dim inmsg As String
        ' uendelig løkke med:
        '  skriv til server
        '  læse fra server
        '  udskriv det læste til skærmen       
        While True
            outmsg = "Dette er en streng eller en fil"
            wrt.WriteLine(outmsg)
            wrt.Flush
            inmsg = rdr.ReadLine
            Console.WriteLine(inmsg)
            Thread.Sleep(500)
        End While
        ' luk alting
        wrt.Close
        rdr.Close
        client.Close
    End Sub
End Class

Server:

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

Class Server
    Public Shared Sub Main(ByVal args As String())
        ' lyt på port 1234
        Dim server As TcpListener = New TcpListener (IPAddress.Any, 1234)
        server.Start
        ' vent på connection
        Dim client As TcpClient = server.AcceptTcpClient
        ' hent writer og reader til at skrive og læse med
        Dim rdr As StreamReader = New StreamReader (client.GetStream)
        Dim wrt As StreamWriter = New StreamWriter (client.GetStream)
        Dim outmsg As String
        Dim inmsg As String
        ' så længe der kommer data ind:
        '  læs data fra client
        '  udskriv data til skærmen
        '  skriv svar tilbage til client
        inmsg = rdr.ReadLine
        While Not (inmsg Is Nothing)
            Console.WriteLine(inmsg)
            outmsg = "OK"
            wrt.WriteLine(outmsg)
            wrt.Flush
            inmsg = rdr.ReadLine
        End While
        ' luk alting
        rdr.Close
        wrt.Close
        client.Close
        server.Stop
    End Sub
End Class

Både ved client og server siger den at TcpClient ikke er defineret:

C:\WINDOWS\Microsoft.NET\Framework\v1.1.4322\client.vb(9) : error BC30002: Typen
'TcpClient' er ikke defineret.

        Dim client As TcpClient = New TcpClient ("localhost", 1234)
                      ~~~~~~~~~
Jeg har lige installeret .NET Framework Software Development Kit Version 1.1
så jeg fatter ikke hvad der er galt.
NB: Jeg har ikke Visual Studio