Ping and Email/Text message

Why don’t you just create one at runtime?

Var skt as TCPSocket
skt = new TCPSocket

a) Why use 2 lines of code when 1 is enough:

dim theSocket as new TCPSocket

b) When the socket is created in code the events need to be handled with AddHandler which is quite a bit more advanced than simply having a socket in a window.