USUÁRIO:      SENHA:        SALVAR LOGIN ?    Adicione o VBWEB na sua lista de favoritos   Fale conosco 

 

  Dicas

  Visual Basic    (ActiveX/Controles/DLL)

Título da Dica:  Criando objeto timer em tempo de execução
Postada em 25/11/2003 por Martini         
'no general do form
Private WithEvents Mytime As Timer

'no form load
'Trata ação no FormLoad
Private Sub FRM_0001F9()
Set Mytime = frmFRM00078.Controls.Add("VB.Timer", "HStimme1")
Mytime.Enabled = True  ' habilita o timer.
Mytime.Interval = 100   ' Define o periodo do tempo
End Sub

'evento timer do timer

Private Sub Mytime_Timer()
  Label1.Caption = Right(Label1.Caption, Len(Label1.Caption) - 1) & Left(Label1.Caption, 1)' evento a se realizar no intervalo do tempo.
End Sub
 


CyberWEB Network Ltda.    © Copyright 2000-2021   -   Todos os direitos reservados.
Powered by HostingZone - A melhor hospedagem para seu site
Topo da página