Para ello estoy intentando hacerlo del siguiente modo:
If TabControl1.TabPages(1).Focus Then
PictFlechaIMPLI.Visible = True
AddHandler TimerFlecha.Tick, AddressOf TimerEventFlechaIMPLI
TimerFlecha.Start()
End If
Private Sub TimerEventFlechaIMPLI()
TimerFlecha.Stop()
TimerFlecha.Enabled = True
PictFlechaIMPLI.Visible = False
End Sub
Pero se ve que no lo estoy haciendo correctamente porque no funciona.
�Alguien me puede echar una mano?... Gracias
Private Sub TimerEventFlechaIMPLI(ByVal sender As Object, ByVal e As
System.EventArgs)
TimerFlecha.Stop()
TimerFlecha.Enabled = True
PictFlechaIMPLI.Visible = False
End Sub
Private Sub TabPage2_Enter(ByVal sender As Object, ByVal e As
System.EventArgs) Handles TabPage2.Enter
PictFlechaIMPLI.Visible = True
AddHandler TimerFlecha.Tick, AddressOf TimerEventFlechaIMPLI
TimerFlecha.Start()
End Sub
Espero que te sirva
Un saludo desde Bilbo
Carlos
"J. Carlos Herrero" <J. Carlos@Herrero> escribi� en el mensaje de noticias
news:E1D0236B-1B15-4657...@microsoft.com...