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