ayuda sobre "option group"

marcos74
15 de Noviembre del 2003
ESTIMADOS AMIGOS DEL ZORRO
ME PODRIAN AYUDAR SOBRE LAS OPCIONES EN GRUPO
TENGO UN option group CON 4 OPCIONES
OP1,OP2,OP3,OP4

Y UN command button DENOMINADO "Registro"
LO QUE NECESITO ES QUE AL HACER CLICEN EL BOTON REGISTRO VERIFIQUE QUE OPCION ESTA ACTIVADA Y ME MUESTRE UN MENSAJE "la ocpion activada es la 1 , la 2, la 3 o la 4 " SEGUN SEA EL CASO
ME PODRIAN AYUDAR
GRACIAS, SALUDOS DESDE PUEBLA

hen
15 de Noviembre del 2003
ESCRIBE EN EL METODO CLICK DEL BOTON "REGISTRO" EL SIGUIENTE CODIGO:

LOCAL _MENSAJE
DO CASE
CASE THISFORM.OPTIONGROUP.VALUE=1
_MENSAJE = "LA OPCION ACTIVADA ES LA 1"
CASE THISFORM.OPTIONGROUP.VALUE=2
_MENSAJE = "LA OPCION ACTIVADA ES LA 2"
CASE THISFORM.OPTIONGROUP.VALUE=3
_MENSAJE = "LA OPCION ACTIVADA ES LA 3"
CASE THISFORM.OPTIONGROUP.VALUE=4
_MENSAJE = "LA OPCION ACTIVADA ES LA 4"
OTHERWISE
_MENSAJE = "NO HAY OPCIONES ACTIVAS"
ENDCASE

=MESSAGEBOX(ALLTRIM(_MENSAJE),64,"INFORMACION DEL REGISTRO")

******
CON ESTO OBTIENES UNA VENTANA CON EL MENSAJE DESEADO INDICANDOTE QUE OPCION ESTA ACTIVA. ESPERO QUE TE SIRVA