Visual Basic - Select case Anidados

Life is soft - evento anual de software empresarial
 
Vista:

Select case Anidados

Publicado por Santiago (1 intervención) el 10/02/2007 01:19:11
buenas quisiera saber si se pueden usar los procedimientos Select case anidados (uno adentro de otro)

ejemplo :

select case <condicion>

case is = 1
select case <condicion 2>
case is = "A"
......
......
case = "B"
end select
case is = 2
select case <condicion 2>
case is = "A"
......
......
case = "B"
end select
end select

y si se puede porque me da error el compilador?? esta mal el codigo??? gracias por su ayuda!
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:Select case Anidados

Publicado por Javier (1 intervención) el 10/02/2007 09:02:27
Mira este:
Select Case Val(Text1.Text)
Case 1
Select Case Text2.Text
Case "A"
MsgBox "El valor del text1 es 1 y el de el text2 es A"
Case "B"
MsgBox "El valor del text1 es 1 y el de el text2 es B"
Case "C"
MsgBox "El valor del text1 es 1 y el de el text2 es C"
End Select
Case 2
Select Case Text2.Text
Case "A"
MsgBox "El valor del text1 es 2 y el de el text2 es A"
Case "B"
MsgBox "El valor del text1 es 2 y el de el text2 es B"
Case "C"
MsgBox "El valor del text1 es 2 y el de el text2 es C"
End Select
Case 3
Select Case Text2.Text
Case "A"
MsgBox "El valor del text1 es 3 y el de el text2 es A"
Case "B"
MsgBox "El valor del text1 es 3 y el de el text2 es B"
Case "C"
MsgBox "El valor del text1 es 3 y el de el text2 es C"
End Select
Case Else
MsgBox "Cualquier otra opción..."
End Select
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar