Decimales Como Valor De Incremento En Bucle


Objetivo: Decimales Como Valor De Incremento En Bucle
Hola!.

¿ Habéis usado decimales en los bucles para la variable de control o de incremento ?.
Como normalmente usamos enteros. Lo he visto en basic de Sinclair y ahora en un Amiga Basic.
En un bucle For lo vi en un Sinclair, no existan los While. Se imitaban.

Public Sub Ejemplo2()
Dim i As Float

i = 0.1

Do While i < 20
Print i
i *= 1.4
Loop

End


Salida:
Citar:

0,1
0,14
0,196
0,2744
0,38416
0,537824
0,7529536
1,05413504
1,475789056
2,0661046784
2,89254654976
4,049565169664
5,6693912375296
7,93714773254143
11,112006825558
15,5568095557812


Saludos

Objetivo: Re: Decimales Como Valor De Incremento En Bucle
Pues sí, las he usado tanto para incrementar como para decrementar, por ejemplo, el valor de un progresbar:
Public Sub Timer1_Timer()

If pgbtiempo.Value > 0 Then ‘si el valor de pgb es mayor a cero
pgbtiempo.Value = pgbtiempo.Value – 0.01 ‘restarle a pgb 0.01(1%)
Else

En este caso el progresbar arranca en 1, no es un bucle sino que lo controla es un timer, pero podría hacerse con un bucle perfectamente.
Saludos

Objetivo: Re: Decimales Como Valor De Incremento En Bucle
Dani:

Si, efectivamente, con este componente es normal usarlo.Es un caso concreto,
donde el componente tiene unas propiedades determinadas.

Creo que son para unos usos muy determinados.Que yo sepa, no solemos usar
decimales en los bucles.

Hay casos como para cálculos,representaciones gráficas.Incluso así, hemos
inventado otras maneras con funciones.

Saludos


Página 1 de 1


  
No puede crear mensajes
No puede responder temas
No puede editar sus mensajes
No puede borrar sus mensajes
No puede votar en encuestas
No puede adjuntar archivos
Puede descargar archivos
No puede publicar eventos en el calendario

   

Está utilizando la versión (Lo-Fi). Para ver la versión completa del foro, haga clic aquí.

Powered by Icy Phoenix based on phpBB
Design by DiDiDaDo

Página generada en:: 1.0667s (PHP: -92% SQL: 192%)
Consultas SQL: 45 - Debug off - GZIP Activado