[AYUDA] Titulo de form rotativo
Buenas gente, soy nuevo acá, i nada, vengo así buscando ayuda :$
ajaja
emm, quería saber si me pueden ayudar a hacer que el titulo del form rote, es decir, que ha determinado tiempo, el numero se multiplique por 2, de nuevo, y de nuevo hasta que se cierre el programa.
Es decir, necesito si me ayudan con el cod. Fuente para que rote el titulo del form y el numero (53,3) se vaya multiplicando x2 cada 1 segundo, y su resultado por 2 de nuevo, y etc.
Gracias de antemano
ajaja
emm, quería saber si me pueden ayudar a hacer que el titulo del form rote, es decir, que ha determinado tiempo, el numero se multiplique por 2, de nuevo, y de nuevo hasta que se cierre el programa.
Es decir, necesito si me ayudan con el cod. Fuente para que rote el titulo del form y el numero (53,3) se vaya multiplicando x2 cada 1 segundo, y su resultado por 2 de nuevo, y etc.
Gracias de antemano
1 Respuesta
Respuesta de andriu25
1
Veamos si entendí bien la pregunta...
Voy a enviar un código con el cual el Caption del Formulario cambia cada segundo, mostrando el resultado de la multiplicación por 2 del número 53.3.
Primero crea un formulario (Por default el VB6 lo deja como Form1)
Luego insertale unTimer(Por default el vb6 lo deja como Timer1)
Echo lo anterior... agregale el siguiente código
Dim Numero As Double
Private Sub Form_Load()
Timer1.Interval = 1000
Numero = 53.3
End Sub
Private Sub Timer1_Timer()
Numero = Numero * 2
Form1.Caption = Str(Numero)
End Sub
Voy a enviar un código con el cual el Caption del Formulario cambia cada segundo, mostrando el resultado de la multiplicación por 2 del número 53.3.
Primero crea un formulario (Por default el VB6 lo deja como Form1)
Luego insertale unTimer(Por default el vb6 lo deja como Timer1)
Echo lo anterior... agregale el siguiente código
Dim Numero As Double
Private Sub Form_Load()
Timer1.Interval = 1000
Numero = 53.3
End Sub
Private Sub Timer1_Timer()
Numero = Numero * 2
Form1.Caption = Str(Numero)
End Sub
