Selecionar Caixa De Texto

[mvrinaldi]

Olá galera,

Tenho uma caixa combo com 5 itens numerados:

1 abc

2 cde

3 fgh

...

Após esse caixa tenho 5 caixas nas quais devo digitar uma série numérica. A caixa que devo digitar vai depender de qual item eu escolher acima. p.ex. Se eu escolher o "2 cde" devo digitar na segunda caixa. Se escolher a "3 fgh" digito na terceira caixa.

Alguém aí sabe como faço para, a partir da digitação do nro no combo, desabilitar as outras caixas e pular para aquela que interessa.

Marcos

[rbordini]

salve!

faz assim:

no "ao perder foco" da combox coloque o seguinte:

If combox = 1_abc then

caixa2.enabled = false

caixa3.enabled = false

ElseIf combox = 2_cde then

caixa1.enabled = false

caixa3.enabled = false

ElseIf combox = 3_fgh then

caixa1.enabled = false

caixa2.enabled = false

End If

Sds,

[mvrinaldi]

Olá,

Digitei o código que tc falou mas deu o seguinte erro:

variável não definida.

Como faço?

Marcos

[rbordini]

Estranho...

Tente colocar o valor da combox entre aspas.

[Guest Guest]

Olá,

Com as aspas parece que os comandos if, then, false foram corretamente lidos pois ficaram em azul.

Porém, continua dando a mesma msg: variável não definida e marca a palavra combo. Mudei para combobox. Ele leu e alterou as letras para ComboBox mas continua dando a mesma msg.

Se eu coloco a palavra ComboBox entre parênteses a msg aponta para a palavra caixa2. Se eu coloco caixa2 entra parênteses a msg muda para:

Erro de compilação

Era esperado:número de linha ou rótulo ou Instrução ou fim da instrução

Obrigado

Marcos

[Guest ßønny]

Olá, Tenta assim:

If me.NomeDoCampo.value ="1_abc" then (quando você digitar o 'me.'ele te dá todos os nomes de comandos que você tem no seu formulário)

caixa2.enabled = false

caixa3.enabled = false

ElseIf me.NomeDoCampo.value = "2_cde" then

caixa1.enabled = false

caixa3.enabled = false

ElseIf me.NomeDoCampo.value = "3_fgh" then

caixa1.enabled = false

caixa2.enabled = false

End If

Espero ter ajudado!

Abraços

[Guest ßønny]

Ops!!!!

esqueci um detalhezinho!!!

Olha assim fica mais correto:

If me.NomeDoCampo.value ="1_abc" then (quando você digitar o 'me.'ele te dá todos os nomes de comandos que você tem no seu formulário)

me.caixa2.enabled = false

me.caixa3.enabled = true

(aqui em cima, você vai dizer que TRUE é aquela campo que você vai escolher/digitar e FALSE aquele que você não vai digitar!)

ElseIf me.NomeDoCampo.value = "2_cde" then

me.caixa1.enabled = false

me.caixa3.enabled = false

ElseIf me.NomeDoCampo.value = "3_fgh" then

me.caixa1.enabled = false

me.caixa2.enabled = false

End If

[Guest Guest]

10!!!!!! Valeu.....