Pessoal, quem já programou em Clipper deve se lembrar de uma função que fazia com que um texto ficasse "piscando" na tela. Faz muito tempo que não programo em Clipper, nem lembro mais como é essa função. Pois bem, em VB existe uma maneira de fazer com que um lembrete fique piscando na tela?

Não da mesma maneira que o clipper, se não me falha a memória, era a formatação com asterisco que fazia isso. No VB vc provavelmente vai ter que usar um timer sobre um label.

A forma que eu conheço é coloque o objeto timer no seu formulário

e  no evento

Private Sub Timer1_Timer()

    DoEvents
    Tempo = Tempo + 1

    If Tempo / 500 <> Int(Tempo / 500) Then

            Label9.Caption = "Mensagem"
    else
            Label9.Caption = "Mensagem"
    end if

End  Sub

Perci,

 

Teste o exemplo abaixo e veja se isso se assemelha ao que

perguntou. Lógico, não é uma função, mas pode servir como

base a criação de uma.

 

1 - Use um "Timer1" e uma "Label1" assim:

 

Timer1.Interval = 300 (diminua ou aumente esse valor e veja o resultado)

Label1.Caption = "Mensagem piscante"

 

2 - No evento "Timer" do "Timer1", faça apenas isso:  

 

Private Sub Timer1_Timer()
      Label1.Visible = Not (Label1.Visible)
End Sub

 

 

Joseph
Técnico em Informática, programador e futuro filósofo
São Paulo/SP
<jsff77@hotmail.com>

 

Valeu Joseph, esta deu certo, obrigado