Crea un formulario con un cronómetro con intervalo de 50 y escribe el siguiente código:
Private Sub Timer1_Timer()
Static a As Integer
a = a + 1
If a = 5 Then
Image1.Picture = LoadPicture("c:\windows\matrix_800.bmp")
End If
If a = 25 Then
Image1.Picture = LoadPicture("c:\windows\matrix_reloaded28.bmp")
End If
If a = 35 Then
Image1.Picture = LoadPicture("c:\windows\matrix_xp_800.bmp")
End If
If a = 45 Then
Image1.Picture = LoadPicture ("c:\windows\matrixreloaded800x600.bmp")
End If
If a = 55 Then
a = 0
End If
End Sub
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 |
![]() |