Foro de elhacker.net

Programación => Programación Visual Basic => Mensaje iniciado por: kikev10 en 7 Agosto 2006, 18:38 pm



Título: Cronometro
Publicado por: kikev10 en 7 Agosto 2006, 18:38 pm
buenas estoy intentando hacer un cronometro sencillo, pero el problema es que quiero que me mida hasta las milesimas  :-\

He encontrao un codigo que hace uno, pero solo llega hasta las centésimas, como seria para las milesimas?


Título: Re: Cronometro
Publicado por: elmaro en 7 Agosto 2006, 18:49 pm
pa las milesimas es simple., con el timer en interval 1
el timer usa como valos milesimas ,. osea,. valor=1000milesimas=1segundo
tonces pones el interval en 1 y listo,. ahi tenes milesimas

para las centesimas calculo que seria un interval de 100
suerte


El MaRo!


Título: Re: Cronometro
Publicado por: dPix en 7 Agosto 2006, 18:50 pm
Con el intervalo del Timer puesto al 1, 1000 (1 seg) el propio intervalo está en milésimas.

Salu2


Título: Re: Cronometro
Publicado por: dPix en 7 Agosto 2006, 18:51 pm
eso es elmaro, te has adelantado a mi respuesta mientras la ponía, bueno, no t he podido ayudar, pero... por un minuto, jeje, enga saludos


Título: Re: Cronometro
Publicado por: elmaro en 7 Agosto 2006, 18:53 pm
jajjaaj a mi me a pasado eso,. y postie exactamente lo mismo que abian postiado :P,. despeu me preguntaron si era los mismo jajaja,. y les conte la istoria :P(me abi ido a comer y no abia presionado el poton publicar xD)


Título: Re: Cronometro
Publicado por: dPix en 7 Agosto 2006, 19:18 pm
jejeje, es la primera vez que me pasa, pero si te fijas es exactamente lo mismo lo de los 2 xD, pues nada, salu2


Título: Re: Cronometro
Publicado por: kikev10 en 7 Agosto 2006, 22:15 pm
El caso es que probando eso que me decis, por ejemplo creo un textBox y un timer. El valor interval de timer lo pongo oa 1 y pongo el siguiente codigo

Código:
Private Sub Timer1_Timer()
Text1.Text = 1 + Val(Text1.Text)
End Sub

en el text box sale un numero que se incrementa, pero al ritmo de las centesimas, en vez de las milesimas. Por ejemplo cuando va por el 512 por decir un numero, el 5 aumenta cada segundo, el 1 decimas y el 2 centesimas. Y yo lo busco es que me muestre tambien las milesimas.

Espero haberme explicado con claridad.

Un saludo


Título: Re: Cronometro
Publicado por: elmaro en 8 Agosto 2006, 00:24 am
hola que tal,. bueno recien llego de trabajar y te doy esto,. aver si te sirve,. espero que si
pon este code en un timer con interval = 1

Código:
Static seg
Static cent
Static mil

mil = mil + 1
If mil = 9 Then
mil = 0
cent = cent + 1
End If

If cent = 9 Then
cent = 0
seg = seg + 1
End If

Label1 = seg & " - " & cent & " - " & mil

espero que te sirva,.  es muy simple,. si tenes duda pregunta nomas
un saludo




El MaRo!


Título: Re: Cronometro
Publicado por: kikev10 en 8 Agosto 2006, 00:46 am
hola que tal,. bueno recien llego de trabajar y te doy esto,. aver si te sirve,. espero que si
pon este code en un timer con interval = 1

Código:
Static seg
Static cent
Static mil

mil = mil + 1
If mil = 9 Then
mil = 0
cent = cent + 1
End If

If cent = 9 Then
cent = 0
seg = seg + 1
End If

Label1 = seg & " - " & cent & " - " & mil

espero que te sirva,.  es muy simple,. si tenes duda pregunta nomas
un saludo

El MaRo!

Lo unico que me sale en label es
Código:
- - 1
dime que hago mal :S


Título: Re: Cronometro
Publicado por: Hans el Topo en 8 Agosto 2006, 00:54 am
pon refrehs cada vez que cambies el valor del label...


Título: Re: Cronometro
Publicado por: kikev10 en 8 Agosto 2006, 01:00 am
pon refrehs cada vez que cambies el valor del label...
uf perdoname, pero estoy un poco verde en VB todavia. Me lo podrias explicar

Y otra cosa, en el codigo anterior, donde esta el timer? :S


Gracias y un saludo


Título: Re: Cronometro
Publicado por: Hans el Topo en 8 Agosto 2006, 01:11 am
pon refrehs cada vez que cambies el valor del label...
uf perdoname, pero estoy un poco verde en VB todavia. Me lo podrias explicar

Y otra cosa, en el codigo anterior, donde esta el timer? :S


Gracias y un saludo

lo del código anterior... eso es el código del timer... xD

y el refresh va tras cambiar el valor del label

label=lokesea
label.refresh


Título: Re: Cronometro
Publicado por: kikev10 en 8 Agosto 2006, 01:24 am
vale ya salen las tres cifras incrementandose, pero son 'segundos' 'decimas' y 'centesimas'... sigue sin salir las milesimas

o lo que realmente lo que pasa es que no estan las deciamas??

perdon, pero me estoy liando :S


Título: Re: Cronometro
Publicado por: elmaro en 8 Agosto 2006, 01:32 am
mira,. recien mire un cronometro que tengo aca,. y no aparecen mas mediciones,. aparecen esas tres que te puse,. despeu de eso aparecen los minutos y las horas,.


Título: Re: Cronometro
Publicado por: kikev10 en 8 Agosto 2006, 01:34 am
vaya, pues necesito que me mida minutos, segundos, decimas, centesimas y milesimas, al estilo de

1:46.329

a ver si a alguien se le ocurre algo


Título: Re: Cronometro
Publicado por: elmaro en 8 Agosto 2006, 01:40 am
mmmmmmmmmm
bueno deja pensar,. yo me voy al gimnacio a entrenar los musculos un rato :P y cuadno vuelv a la noche veo si te puedo acer un codigo para vos y te lo posteo
suerte,. y explicame tu "estilo"
Citar
vaya, pues necesito que me mida minutos, segundos, decimas, centesimas y milesimas, al estilo de

1:46.329

el numero ese que muestra?'
el 1 es minutos?? el 46 son segundos?' y el 329??? decimas, centesims y milesimas? ^o)


Título: Re: Cronometro
Publicado por: kikev10 en 8 Agosto 2006, 01:42 am
mmmmmmmmmm
bueno deja pensar,. yo me voy al gimnacio a entrenar los musculos un rato :P y cuadno vuelv a la noche veo si te puedo acer un codigo para vos y te lo posteo
suerte,. y explicame tu "estilo"
Citar
vaya, pues necesito que me mida minutos, segundos, decimas, centesimas y milesimas, al estilo de

1:46.329

el numero ese que muestra?'
el 1 es minutos?? el 46 son segundos?' y el 329??? decimas, centesims y milesimas? ^o)

si, efectivamente, es:
1 (minutos)
46 (segundos)
3 (decimas)
2 (centesimas)
9 (milesimas)

gracias por las molestias :)


Título: Re: Cronometro
Publicado por: elmaro en 8 Agosto 2006, 05:51 am
bueno.... no voy a postiar el code xq ay algunos que otros controles y no me voy a poner a explicar como va cada uno,. aunke sea simple xD
en fin,. me tomo un ratito hacerlo,. y te lo dejo aki,. espero te sirva,. cuentame como te andubo y demas
y tenme en cuenta :) que es l primera vez que armo un "proyecto" para alguien jeje
saludos y avisa como te fue


Cronometro:
http://www.badongo.com/file/1194963


El MaRo!


Título: Re: Cronometro
Publicado por: kikev10 en 8 Agosto 2006, 11:33 am
muchisimas gracias elmaro! es tal lo que buscaba, ahora lo integrare en mi programita

muchas gracias


Título: Re: Cronometro
Publicado por: kikev10 en 8 Agosto 2006, 14:33 pm
solo una cosa mas elmaro, que significa esta parte del codigo
Código:
Private Sub Form_Load()
Me.Show
Vmil1 = 0
Vcen1 = 0
Vdec1 = 0
Vseg1 = 0
Vmin1 = 0
End Sub

Sobretodo lo que no llego a entender es lo de Me.show

gracias de nuevo


Título: Re: Cronometro
Publicado por: elmaro en 8 Agosto 2006, 17:03 pm
Código:
Private Sub Form_Load()
Me.Show
Vmil1 = 0
Vcen1 = 0
Vdec1 = 0
Vseg1 = 0
Vmin1 = 0
End Sub

eso es para que cuadno aparezca el formulario en el label aparezca 0:0:0.000,. si no est eso aparece :::. ya que el timer que muestr el cronometro est en enable desde el principio

y el me.show es para que te muestre el formulario,. xq lo puse en visible=false,. para uevear un rato :P