Visual Basic para Aplicaciones - Case

Life is soft - evento anual de software empresarial
 
Vista:

Case

Publicado por Lorena (17 intervenciones) el 02/01/2002 20:25:31
Hola a todos, y Feliz año!
Estoy trabajando con Excel y quería saber si existe el case of y de qué modo lo puedo utilizar o dónde ubicar información al respecto.

Muchas gracias.
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:Case

Publicado por Mauricio Baeza (262 intervenciones) el 03/01/2002 17:17:13
A que te refieres con "case of" Lorena, saludos...
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

RE:Case

Publicado por Lorena (17 intervenciones) el 03/01/2002 17:42:47
Hola, estoy buscando cómo utilizar la intr. select case...
Saludos y Gracias,
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

RE:Case

Publicado por Daniel (9 intervenciones) el 03/01/2002 21:57:02
En los ej del visual tener unos cuantos pero aca va.

dim opcion as integer
....
select opcion
case 1: rem aca va lo es si vale 1

case 2,3: rem aca va si vale 2 o 3

case 4-9: rem aca va si vale entre 4 y 9 inclusive

case default: rem si no se da ninguna anterior entra aca

end select

Suerte Daniel.

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

RE:Case

Publicado por Mauricio Baeza (262 intervenciones) el 04/01/2002 20:37:49
Es muy facil amiga, el Select Case sirve ejecutar una o muchas acciones, dependiendo del valor de una variable, ejemplo muy simple:

Private Sub Calificar()
Dim Califica As Integer

Califica = Val(InputBox("Introduce la calificacion"))

Select Case Califica
Case 0
MsgBox "Pesimo"
Case 1
MsgBox "Muy mal"
Case 2 To 5
MsgBox "Malisimo"
Case 6, 7
MsgBox "Suficiente"
Case 8
MsgBox "Bueno"
Case 9
MsgBox "Muy Bueno"
Case 10
MsgBox "Excelente, felicidades"
Case Else
MsgBox "Que nota es esa??"
End Select

End Sub

Pero el Select Case es muy versatil y poderoso, puedes usar tambien como variables fechas y texto
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