Problem med interfaces.

Nu er jeg ved at blive ånsvag i toppen og kan ikke finde ud af det mere. Jeg har en fil, som har nogle interfaces:

Namespace commm
    Public Interface IServerCommunication
        Function GetServerStatus() As String
        Function GetShootStatus(ByVal UniqueGameId As String) As Boolean
        Function GenerateNewGame(ByVal PlayerName As String, ByVal BoardX As Integer, ByVal BoardY As Integer) As String
    End Interface
End Namespace

I en anden fil har jeg så selve funtionerne:

    Public Function GetServerStatus() As String _
        Implements IServerCommunication.GetServerStatus
        Console.WriteLine("Welcome...")
        Return "Ready"
    End Function

    Public Function GetShootStatus(ByVal UniqueGameId As String) As Boolean _
        Implements IServerCommunication.GetShootStatus
        Return FindGame(UniqueGameId).ShootStatus
    End Function

Det hele virker fint på 'GetServerStatus()', men på  GetShootStatus i sidst omtalte fil siger Visual Studio: D:\Privat\Benny\IOT.NET Projekt\ss\ssmanager\Work.vb(16): 'GetShootStatus' cannot implement 'GetShootStatus' because there is no matching function on interface 'IServerCommunication'.

Hvad f.... gør jeg forkert?