Pasar datos de OptionButton aTextBox
Expertos, tengo el siguiente caso:
Tengo un textbox que me sirve de caja se observación y 6 OptionButton cada uno con una leyenda OptionButton1: propiedad caption "acepto propuesta", OptionButton2: "propiedad caption no acepto propuesta", etc.
Lo que deseo es lo siguiente cuando seleccione cualquiera de los OptionButton el caption se copie en el text asi evito que los usuarios puedan modificar las observaciones.
A la espera de su pronta ayuda
saludos,
Alberto
1 respuesta
Respuesta de yijo
1
Debes escribir el siguiente código en el evento Click de cada botón de opción.
----------------------------------
Private Sub OptionButton1_Click()
txtCajaDeObservación.text=OptionButton1.Caption
End Sub
-------------------------------------
Que tengas un EXCELente día!
Jorge A. Rodríguez Lopera
