.NET Remoting with Windows Forms

I have looked through various tutorials and figured out how to get one of them working.. made a little sample with the following setup:

1) Server (console app, with console.readline()  to keep the listener open)
2) Client (console app that calls the remote code)
3) Class library which is the remote vb.net  code.  


What I don't understand is how am I going to use Remoting to send a signal from my Windows Service to the system tray icon..(Windows form) ?    When the Service becomes active I want it to send a message to the desktop (System Tray) so that the System Tray can change its icon into an 'active' mode, or I will have alittle msn like window pop up.  

What I know:    put the server code in the system tray project,  client code in the Service.

What I need to know:   When the Client calls the Remote Code, how can I get this code (which is just a class library)  to pop up a window or do something as mentioned above?   I couldn't get the remote code to work any other way than just a class library, is there a way to have my entire form the remote code?  (I tried that but then couldn't reference it in the server because i can only reference .dll , and the .exe wasn't a proper format I guess).

Any help would be appreciated.  Thanks.



This is the code:


Class library ###########################################
Public Class SampleRemoter : Inherits MarshalByRefObject

    Public Function getUser() As String
        Return Environment.MachineName
    End Function

End Class
###################################################

Server###############################################

Class RemotingServer

    Shared Sub Main(ByVal args() As String)

        Console.WriteLine("Registering our remote object...")
        RemotingConfiguration.RegisterWellKnownServiceType(GetType(SampleRemoter), "SampleRemoter", WellKnownObjectMode.SingleCall)
        Console.WriteLine("Create and register a channel...")
        Dim ch As New TcpServerChannel(8080)
        ChannelServices.RegisterChannel(ch)
        Console.Read()

    End Sub

End Class

###################################################

Client ###############################################

    Shared Sub Main(ByVal args() As String)
        Try
            Console.WriteLine("Registering Channel...")
            Dim ch As New TcpClientChannel
            ChannelServices.RegisterChannel(ch)
            Console.WriteLine("Registering remote object in local domain...")
            RemotingConfiguration.RegisterWellKnownClientType(GetType(SampleRemoter), "tcp://localhost:8080/SampleRemoter")
            Console.WriteLine(" Create remote object and execute method")
            Dim sr As New SampleRemoter
            Dim username As String = sr.getUser()
            Console.WriteLine("Machine name of remote machine = " & username)
        Catch ex As Exception
            Console.WriteLine(ex.ToString())
        Finally
            Console.Read()
        End Try


###################################################