quarta-feira, 8 de dezembro de 2010

on
1º - Arraste um label para o seu formulário;
2º - Arraste um timer para o seu formulário;
3º  - Na propriedade do timer coloque enable (true)  e interval coloque (1);
4º - Dedois cliques no timer e insira o código logo abaixo;

        Dim H As Integer

        H = Label1.Location.X

        If H <= 12 Then
            H = 613
        End If

        H = H - 1
        Label1.Location = New System.Drawing.Point(H)

5º - A variavél H está referindo a posição do label, então sugiro que olhe na propriedades do label (Location) e coloque como achar melhor;
6º - Agora rode o programa e pronto;
7º - Espero que gostem e t+.

2 comentários:

  1. Muito Obrigado pelo comentário...

    Atenciosamente,
    Carlos Henrique Pereira - Analista de TI.

    ResponderExcluir
:) :)) ;(( :-) =)) ;( ;-( :d :-d @-) :p :o :>) (o) [-( :-? (p) :-s (m) 8-) :-t :-b b-( :-# =p~ $-) (b) (f) x-) (k) (h) (c) cheer
Click to see the code!
To insert emoticon you must added at least one space before the code.