Capítulo 8:

 Ejercicio 6: Alarma

                         

Crea un formulario con tres etiquetas, dos cajas de texto, dos botones, un reloj con intervalo de 1000 y escribe el siguiente código:

El botón Establecer la Alarma y Minimizar

Private Sub Command1_Click()

Form1.WindowState = 1

Timer1.Enabled = True

End Sub

El botón Salir

Private Sub Command2_Click()

Unload Me

End

End Sub

El reloj

Private Sub Timer1_Timer()

Dim horas As String

hora = Format(Time, "hh:mm")

If hora = Text1.Text Then

Beep

MsgBox Text2.Text, vbOKOnly + vbInformation, "Aviso de la Alarma"

Timer1.Enabled = False

Form1.WindowState = 0

End If

End Sub

Cursos similares a Manual de Visual Basic Principiante

1. Manual de Visual Basic Intermedio Esta es la segunda parte del Manual de Visual Basic Principiante. Con él podrás... [17/03/06]				22.740
2. Visual Basic Express. Crear alarma (1/4) Alarma en Visual Basic 2008. Sigue nuestro curso de informática y aprende a... [13/04/11]				884
3. Visual Basic Express. Crear una alarma (2/4) Crear una alarma en Visual Basic 2008 Express . Te presentamos la continuación del... [13/04/11]				352