Ha più senso scrivere

codice:
If Winsock1(u).State = sckConnected Then
   Winsock1(u).SendData ")))" & List1.Text
End If