HABILITAR BUTTOM VIA TEXTBOX

OSH999 05/12/2013 15:41:59
#431817
Qual comando devo usar para que só libere o buttom quando escrever na textbox?

deixei ele Desabilitado para habilitar é preciso escrever algo na textbox !

tem algum comando para isso?
qual seria ?

Grato a todos !
OGUSTAVOREIS 05/12/2013 16:05:31
#431818
Inicia ele bloqueado

Me.textbox1.Locked = True

depois no botão

faz um if

If textbox1 == [Ô][Ô]
Me.textbox1.Locked = false
end if

é por ai, to correndo por isso escrevi rapido
OSH999 05/12/2013 17:15:04
#431822
vou tentar gente obrigado :)

@edit

não deu certo gente :(

não habilita o bottom :(
MARCELO.TREZE 05/12/2013 17:24:14
#431823
é vb6 é vba é oq
OSH999 05/12/2013 20:56:17
#431830
Citação:

:
é vb6 é vba é oq





preciso responder mais alguma coisa?
MARCELO.TREZE 05/12/2013 22:40:52
#431831
Precisa sim

VB6 e VBA possuem diferenças

você sabia?

O fato de você ter postado no forum VB/VBA não quer dizer que o código seja dos mesmos, fato comum aqui é postarem errado.


mas desculpa ai, você entrou no forum em 05/11/2013 e não em 21/04/2009 (já segundo cadastro), e como novato deve ser mais esperto que um oráculo.

então espertão resolve ai sózinho
NILSONTRES 05/12/2013 22:54:22
#431834
OSH999,
Cara que infeliz a sua resposta, Para o código do marcelo não ter dado certo, ele acabou removendo, fica realmente dificil saber se é vb ou vba.
Resposta deselegante, e irritante a quem apenas queria ajudar.
FILMAN 06/12/2013 00:46:18
#431836
Cara de fato pisou na bola!

Porém o Marcelo é um cara muito gente boa e vai te ajudar, mas peço que você seja mais passivo quanto as suas respostas.
No entanto é verdade vb6 é diferente de vba apesar de ter suas coincidências!

Mas tente usar o LostFocus ou Change ou KeyPress
ambos são propriedades do TextBox


Pense um pouco e no mínimo peça desculpas cara isso não vai fazer você morrer!

Espero ter ajudado
OGUSTAVOREIS 06/12/2013 14:54:26
#431875
Mas é um bobão mesmo foi se meter com um Oraculo...

vamos ser mais humildes né hsauhsuhsausa

deu kkk

Antes não tinha entendido a dificuldade, segue ai e deu certinho, se quiser baixa o anexo tbm.

Inicia com botão bloqueado
e só faz uma condição na caixa de texto, se tiver vazia habilita o botão.

  Private Sub TextBox1_Change()

If TextBox1 = [Ô][Ô] Then
    Call DesabilitaControles
Else
    Call HabilitaControles
End If

End Sub
[ô]Habilita botão
Private Sub HabilitaControles()
    Me.button1.Locked = False
End Sub
[ô]Desabilita botão
Private Sub DesabilitaControles()
    Me.button1.Locked = True
End Sub
[ô]inicia caixa de texto
Private Sub UserForm_Initialize()

    Call DesabilitaControles
    
End Sub
Faça seu login para responder
Voltar