SoloCodigo
Programación General => Visual Basic 6.0 e inferiores => Mensaje iniciado por: kail en Lunes 4 de Noviembre de 2002, 15:03
-
Hola
Espero no ofender a nadie con mi petición, ya que para ustedes debe ser muy tonta. Modifique la propiedad style de un optionbutton a graphical, y lo que necesito hacer es que al leer la informacion de una base de datos dependiendo si el valor de un campo "X" sea true o False el optionbutton aparezca presionado o no, o sea, quiero dar el efecto que produce el click sobre el optionbutton, pero a traves de código.
Espero que puedan ayudarme.
Gracias de Antemano
Macarena
-
La propiedad Value del Option button es la que tenés que modificar.
Javier
-
cuando el valor del campo de la base de datos =true
if campo=true then
option1.value=1
else
option1.value=0
end if
-
Hola
Quiero dar las gracias a las personas que me trataron de ayudar. El problema que tenía, era que apareciese el optionbutton presionado si el valor del campo era falso, situacion que no ocurria al leer la propiedad Value. La solución iba por el lado de simular el click del mouse sobre el optionbutton cuando el campo fuese falso. La respuesta la encontré en un API:
Private Declare Function SendMessage Lib "user32" _
Alias "SendMessageA" _
(ByVal hwnd As Long, _
ByVal wMsg As Long, _
ByVal wParam As Long, _
lParam As Any) As Long
Private Const WM_LBUTTONDOWN = &H201
Private Const WM_LBUTTONUP = &H202
luego al leer el campo y comprobar que es falso:
Call SendMessage(Option1.hwnd, LBUTTONDOWN, 0, ByVal 0&)
Y con esto solucione el problema que tenía, gracias a todos