PARAR TIMER

ADHEL 25/05/2011 12:06:51
#374937

Tenho uma rotina que joga os campos do datagrid nos textbox utilizando um timer
Essa rotina eu peguei aqui mesmo de um tópico do vbmania .Nesse tópico o Jonathan resolveu .
A diferença é que eu uso um critério para jogar os dados no grid.Que por sinal esta funcionando bem.
O problema é que depois de terminado a rotina ele começa novamente.
Preciso que o timer ou o contador parasse depois que a rotina tivesse sido concluída
Vou postar para melhor entendimento

Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick

If Me.Contador > Me.dgv.RowCount - 1 Then
[txt-color=#e80000] Me.Contador = False

Timer1.Stop()
MessageBox.Show([Ô]Fim[Ô])
Timer1.Enabled = False
Me.Close()[/u] [/strike][/txt-color]
Exit Sub
Else
If dgv.Rows(Me.Contador).Cells(3).Value = [Ô]1[Ô] Then
txtNome.Text = Me.dgv.Rows(Me.Contador).Cells(0).Value.ToString
txtEndereco.Text = Me.dgv.Rows(Me.Contador).Cells(1).Value.ToString
txtCidade.Text = Me.dgv.Rows(Me.Contador).Cells(2).Value.ToString
End If
Me.Contador += 1
End If

Essas linhas ques estão em vermelho foi o que já tentei(uma de cada vez,naturalmente)
Muito obrigado a todos