Need a simple Server Prog to listen to ping request

[bIGMOS]

I made a GUI ping program, now Im lost on how to do the server end of it

Need a simple VB 2005 express program that will listen to ping request and display something like YOU ARE BE PINGED like in a lable.
Do i use AXwiscox ???

If pingReply.Statu s = IPStatus.Succes s Then
Label1.Text = "Ping Received"