Deshabilitar un boton de Comando
Publicado por fernando Diaz G (6 intervenciones) el 05/03/2009 22:49:09
Saludos, colaborenme por favor con lo siguiente
Tengo un form, con una caja de texto a la cual el usuario debe ingresar de manera obligatoria un numero X para iniciar el proceso, cuando este pierde el foco, se habilitan unos botones de Comando.
Dentro de estos botones hay uno que contiene un codigo de validacion para que SEA BLOQUEADO CUANDO LA CONDICION de un If sea verdadera..Adjunto codigo
Private sub Cmd1_click()
static numveces as integer
const numco = 1
if me.txt_registro = numveces + numco then
msgbox " Sehan procesado" & numveces +numco & " de " & me.txt_regsitro & " _ archivos ", vbinformation
numveces = numveces + numco
me.cmd1.enabled = false 'AQUI ME GENERA ERROR POR QUE ESTOY DETRO DEL BOTON Y NO MANTIENE EL FOCO
ELSE
msgbox " Se han procesado" & numveces +numco & " de " & me.txt_regsitro & " _ archivos ", vbinformation
numveces = numveces + numco
me.txt_registro.enabled= false
end if
end sub
Lo que requiero de su colaboracion es ihnabilitar el boton Cmd1 cuando la condicion del IF se cumpla
Gracias
fdg
deseo deshabilitar un boton de comando cuado una condicion se cumpla
Tengo un form, con una caja de texto a la cual el usuario debe ingresar de manera obligatoria un numero X para iniciar el proceso, cuando este pierde el foco, se habilitan unos botones de Comando.
Dentro de estos botones hay uno que contiene un codigo de validacion para que SEA BLOQUEADO CUANDO LA CONDICION de un If sea verdadera..Adjunto codigo
Private sub Cmd1_click()
static numveces as integer
const numco = 1
if me.txt_registro = numveces + numco then
msgbox " Sehan procesado" & numveces +numco & " de " & me.txt_regsitro & " _ archivos ", vbinformation
numveces = numveces + numco
me.cmd1.enabled = false 'AQUI ME GENERA ERROR POR QUE ESTOY DETRO DEL BOTON Y NO MANTIENE EL FOCO
ELSE
msgbox " Se han procesado" & numveces +numco & " de " & me.txt_regsitro & " _ archivos ", vbinformation
numveces = numveces + numco
me.txt_registro.enabled= false
end if
end sub
Lo que requiero de su colaboracion es ihnabilitar el boton Cmd1 cuando la condicion del IF se cumpla
Gracias
fdg
deseo deshabilitar un boton de comando cuado una condicion se cumpla
Valora esta pregunta


0