Private Sub luz_Click()asensor.BackColor = vbRedEnd Sub
Private Sub pisocuatro_Click()asensor.Top = 840End Sub
Private Sub pisodos_Click()asensor.Top = 2280End Sub
Private Sub pisotres_Click()asensor.Top = 1560End Sub
Private Sub parar_Click()
Private Sub pisouno_Click()asensor.Top = 3000End Sub
Private Sub plantabaja_Click()asensor.Top = 3720End Sub
Private Sub subsuelo_Click()asensor.Top = 4440End Sub
Private Sub pisocuatro_Click()asensor.Top = 840End Sub
Private Sub pisodos_Click()asensor.Top = 2280End Sub
Private Sub pisotres_Click()asensor.Top = 1560End Sub
Private Sub parar_Click()
Private Sub pisouno_Click()asensor.Top = 3000End Sub
Private Sub plantabaja_Click()asensor.Top = 3720End Sub
Private Sub subsuelo_Click()asensor.Top = 4440End Sub
No comments:
Post a Comment