WINRT_VS_2012_VB_TIMER_DISPATCHERTIMER

FOGONAGUA 09/02/2013 16:16:18
#419072

[ô]WINDOWS 8 VS-2012 - VB
Imports System
Imports System.Windows
Imports System.Threading

Dim _ds As DispatcherTimer = New DispatcherTimer
[ô] H M S
_ds.Interval = New TimeSpan(0, 1, 0)
[ô]CRIA O EVENTO ->>> EACH_TICK
AddHandler _ds.Tick, AddressOf Me.Each_Tick
_ds.Start()
PRIVATE I AS INTEGER = 0
[ô]EVENTO _CRIADO
Sub Each_Tick()
[ô] EVENTO A SER CHAMADO NO TIMER EXEMPLO
I = I + 1
TEXTBOX1.TEXT = [Ô]CHMAMOU X->>> [Ô] + I
End Sub