Ver Mensaje Individual
  #1 (permalink)  
Antiguo 05/02/2008, 07:31
niker80
 
Fecha de Ingreso: enero-2008
Mensajes: 3
Antigüedad: 16 años, 3 meses
Puntos: 0
urgente porfas necesito cancelar sentencias de un boton

este codigo esta en eun button al darle clic el msgbox preguntara si o no el problema es q si le doy no quiero q las demas sentencias queden canceladas osea el if de abajo ya no se ejecute haber si ayudan porfas es urgeee


If MsgBox("¿Funciona Bomba 1?", vbQuestion + vbYesNo) = vbYes Then

Shape1.FillColor = &HFF00&

Else
Shape1.FillColor = &HFF&
MsgBox ("ERROR!!! - FALLA EN PROCESO")
Text10.Visible = True
Text10.ForeColor = &HFF&
Text10.Text = "ERROR!!!"

End If

If MsgBox("¿Funciona Bomba 2?", vbQuestion + vbYesNo) = vbYes Then

Shape23.FillColor = &HFF00&

Else
Shape23.FillColor = &HFF&
MsgBox ("ERROR!!! - FALLA EN PROCESO")
Text10.Visible = True
Text10.ForeColor = &HFF&
Text10.Text = "ERROR!!!"

End If