• Revista PROGRAMAR: Já está disponível a edição #53 da revista programar. Faz já o download aqui!

Pt Freelancer

[VS 2005] Relógio Digital

17 mensagens neste tópico

Precisava de saber como fazer um relógio digital utilizando vb2005 express edition... alguma ajuda?

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

a parte do código é basicamente meteres um timer com um intervalo de 1s e no evento tick do mesmo mostrar as horas, os minutos e os segundos actuais (através do 'Now()'). Dps para o design isso já depende da tua imaginação :D

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

nao tou a perceber muito bem... basta meter um timer? mas depois como e que eu mostro o tempo? podes dar uma amostra de codigo por favor?

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

Basta no tick do timer pores isto:

lblhora.Text = System.DateTime.Now

E no load do form pores

Timer1.Start()

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

hm... o codigo e esse

lblhora.Text = System.DateTime.Now

agora so tenho um problema e que no label so aparece se clicar nele....

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

Tens o código no evento tick do timer?

Tens o Timer.Start() no load do form?

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

ok obrigado ja sei qual era o problema nao estava a por no load do form :D:)

agora so uma pergunta como e q eu faço para ter so as horas ou so os dias?

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

Basta adicionares à frente a propriedade que queres. Para por exemplo só as horas:

System.DateTime.Now.TimeOfDay

Tens aqui uma lista das propriedades:

Properties

    * Date: returns the date component of the DateTime value.

    * Day: returns the day of the month component of the DateTime value.

    * DayOfWeek: returns the day of the week component of the DateTime value.

    * DayOfYear: returns the day of the year component of the DateTime value.

    * Hour: returns the hour component of the DateTime value.

    * Millisecond: returns the milliseconds component of the DateTime value.

    * Minute: returns the minute component of the DateTime value.

    * Month: returns the month component of the DateTime value.

    * Now: returns a DateTime value that is the current local date and time on this computer.

    * Second: returns the seconds component of the DateTime value.

    * TimeOfDay: returns the time of day of the DateTime value.

    * Today: returns the current system date.

    * UtcNow: returns a DateTime value that is the current local date and time on this computer expressed as the Coordinated Universal Time (UTC).

    * Year: returns the year component of the DateTime value.

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

so um pequeno problema... o comando timeofday no funciona...

o erro e este

Error 2 Value of type 'System.TimeSpan' cannot be converted to 'String'. D:\teste\Form1.vb 57 24 WindowsApplication1

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

é verdade, pessoal, ja agora aproveito aqui a discussao do tempo e pergunto, e se quissesse fazer um analogico? fazia as imagens, e actualizava a cada segundo com o timer?

@Pt Freelancer funciona sim :eek: porque e que no teu nao funciona?

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

todos funcionam menos aquele.. a nao ser que nao esteja a perceber bem o comando... o comando e para por so a hora certo?

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

@Pt Freelancer tenta isto:

System.DateTime.Now.TimeOfDay.ToString

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

ta quase... mas agora aparece os milésimos de segundos .....

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

bom, olha nao consegui descubrir, mas se entretanto descubrir digo-te, até lá podes sempre usar por exemplo assim:

      Label.Text = Format(Now, "hh:mm:ss")

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

Crie uma conta ou ligue-se para comentar

Só membros podem comentar

Criar nova conta

Registe para ter uma conta na nossa comunidade. É fácil!


Registar nova conta

Entra

Já tem conta? Inicie sessão aqui.


Entrar Agora