Programación General > Visual Basic 6.0 e inferiores

 Select Case Y Optionbutton

<< < (2/3) > >>

lencho:
pero si es exactamente lo que puso F_Tanori

--- Citar ---CODE
Option Explicit
Private Sub Option1_Click(Index As Integer)
 Select Case Index
    Case 0
       'Proceso
    Case 1
       'Proceso
    Case 2
       'Proceso
    Case 3
       'Proceso
 End Select
End Sub

--- Fin de la cita ---
que es el uso basico del select Case, lo que ibas a hacer en cada caso ya era de voz.

BYTE.

ArKaNtOs:
nop, exactamente nop, ya que el de F_Tanori es evaluado al dar click en un opt y el que muestra abel es dándole click en un command button ;)

lencho:
esto es lo que puso abelsql3000

--- Citar ---Quisiera compartir un interezante codigo que me andaron y es lo que andaba buscando:

SELECT CASE True
CASE opt(0).Value
call mirutina(params...)
CASE opt(1).Value
call mirutina(params...)
CASE opt(2).Value
call mirutina(params...)
CASE opt(3).Value
call mirutina(params...)
CASE opt(4).Value
call mirutina(params...)
CASE Else
call mirutina(params...)
END CASE

Este de aqui es muy eficiente, (Y)
--- Fin de la cita ---

y esto es lo que puso Francisco

--- Citar ---CODE
Option Explicit
Private Sub Option1_Click(Index As Integer)
Select Case Index
    Case 0
      'Proceso
    Case 1
      'Proceso
    Case 2
      'Proceso
    Case 3
      'Proceso
End Select
End Sub
--- Fin de la cita ---
la unica diferencia es que abelsql3000 evalua un valor booleano y Francisco evalua un valor entero

ArKaNtOs:
Lee todo el hilo por favor

F_Tanori:
:hippi:


El select se finaliza con END SELECT
no END CASE :P


No es lo mismo es parecido :P


Saludos

Navegación

[0] Índice de Mensajes

[#] Página Siguiente

[*] Página Anterior