Ascensor (por Iaru)

Private Sub llamar1_Click()
ascensor.Top = 4680
End Sub

Private Sub llamarcuatro_Click()
ascensor.Top = 1560
End Sub


Private Sub llamardos_Click()
ascensor.Top = 3720 End Sub



Private Sub llamartres_Click()
ascensor.Top = 2640
End Sub