Estuve viendo tu codigo, y el error es sencillo...
Winsock1.SendData enviar2
... el winsock no encuentra la variable enviar2 por eso te envia error... probe a declarar la variable enviar2 y no pasa nada, tambien mire si esta declarada en algun otro control, pero no esta, pero si es asi declarara arriba del todo como Public xx as xx entendes
Espero haberte ayudado.
Salu2
Ranslsad