ftp w/ inet - ok, close pgm is slow

doing some uploading with inet control. this works. but, when i close the form its slow to close. only 2-3 sec. any ideas?
this is my statechanged event:

VB Code:

Private Sub Inet1_StateChanged(ByVal State As Integer)
   'On Error Resume Next
    Select Case State
           Case icNone
           Case icResolvingHost:     txt.Text = txt.Text & vbCrLf & "Resolving Host"
           Case icHostResolved:      txt.Text = txt.Text & vbCrLf & "Host Resolved"
           Case icConnecting:         txt.Text = txt.Text & vbCrLf & "Connecting..."
           Case icConnected:          txt.Text = txt.Text & vbCrLf & "Connected"
           Case icRequesting:          txt.Text = txt.Text & vbCrLf & "Sending a request to the host."
           Case icRequestSent:        txt.Text = txt.Text & vbCrLf & "Successfully sent the request."
           Case icReceivingResponse: txt.Text = txt.Text & vbCrLf & "Receiving a response from the host."
           Case icResponseReceived:   txt.Text = txt.Text & vbCrLf & "Transferring File..."
           Case icDisconnecting:             txt.Text = txt.Text & vbCrLf & "Disconnecting..."
           Case icDisconnected:              txt.Text = txt.Text & vbCrLf & "Disconnected"
           Case icError:  MsgBox "Error:" & Inet1.ResponseCode & " " & Inet1.ResponseInfo
           Case icResponseCompleted:  txt.Text = txt.Text & vbCrLf & "Process Complete.": Inet1.Execute , "CLOSE"
    End Select