[VB6] Winsock, and sending amounts of bytes

[DigiRev]

Winsock1.SendData String$(Text1.Text, "A")

If you typed 4 into the TextBox it would send "AAAA".