Ascensor (por Lau)

Private Sub Boton1_Click()
Ascensor.Top = 4800
End Sub
Private Sub Boton2_Click()
Ascensor.Top = 3720
End Sub
Private Sub Boton3_Click()
Ascensor.Top = 2640
End Sub
Private Sub Boton4_Click()
Ascensor.Top = 1560
End Sub
Private Sub Boton5_Click()
Ascensor.Top = 480
End Sub
Private Sub BotonPB_Click()
Ascensor.Top = 5880
End Sub
Private Sub BotonSS_Click()
Ascensor.Top = 6960
End Sub