Cómo utilizar vb.net para escribir un programa de cuenta regresiva para los Juegos Olímpicos de 2008. ¡¡Gracias!!
Consulte:.net/code/asp/others/2420.html
O:
Cree un nuevo proyecto, 1 botón, 1 temporizador, y 1 cuadro de texto
Ingrese el tiempo (segundos) en el cuadro de texto y haga clic en el botón para iniciar la cuenta regresiva:
Dim i%
Subcomando privado1_Clic ( )
Command1.Caption = IIf(Command1.Caption = "Iniciar cronometraje", "Detener cronometraje", "Iniciar cronometraje")
Timer1.Enabled = No Timer1.Enabled
Timer1.Enabled = No Timer1.Enabled
p>
i = 0
End Sub
Sub privado Form_Load()
Timer1.Enabled = False
Timer1.Interval = 1000
Command1.Caption = "Iniciar tiempo"
Text1 = ""
Fin del sub
Sub privado Timer1_Timer()
Si Texto1 = "" Entonces salga del sub
Cls
Si Val(Text1) - i = 0 Entonces
Imprimir "¡¡¡Tiempo para!!!" >
End If
Imprimir "Ahora aún quedan cosas" & Val(Text1) - i & "Segundo!!" >
Fin del subtítulo