Button Click coding problems (Winsock)

hi guys!.. i have some problems....

I don`t know how to make coding for this situation....
here it is: I want send the data using winsock automatically BY using TIMER...
Private Sub Timer2_Timer()

Winsock.SendData Text1.Text
Text1.Text = ""

End Sub

But....before the data was send, the "Connect" button must be clicked first..... i don`t know how to make this thing happen...
PLEASE HELP ME GUYS...:confused: