USUÁRIO:      SENHA:        SALVAR LOGIN ?    Adicione o VBWEB na sua lista de favoritos   Fale conosco 

 

  Fórum

  Visual Basic
Voltar
Autor Assunto:  Campo com foco
Ivanenko
BELO HORIZONTE
MG - BRASIL
ENUNCIADA !
Postada em 28/04/2005 19:25 hs            
Como fazer quando um campo (textbox, combo, etc..) recebe o foco, mudar a côr do fundo do campo, e quando sair retornar á cor original, sem ter que fazer uma instrução para cada campo?

Ivanenko
   
Rochª
Pontos: 2843 Pontos: 2843 Pontos: 2843
RIO DE JANEIRO
RJ - BRASIL
ENUNCIADA !
Postada em 29/04/2005 01:11 hs            
Voce pode fazer assim
Dim salva_cor
 
Sub COR_TEXT (txt_aux as textbox)
   salva_cor = txt_aux.backcolor ' salva cor
   txt_aux.backcolor = qbcolor(4) ' Coloca a cor numero 4 vermelha, acho
end sub
 
Sub VOLTA_COR_TEXT (txt_aux as textbox)
   txt_aux.backcolor = salva_cor
End sub
 
Em todos os campos voce passa o campo. No gotfocus voce coloca a sub
COR_TEXT txt_nome
e no lostfocus a
VOLTA_COR_TEXT txt_nome
 
Obs Isso so para textbox pode ser feito outras para a combo e etc. Ou usar o controle para fazer uma para todos os tipo.
Nao estou no escritorio para testar escrevi direto e voce deve dar uma boa olhada para ver se nao te erro.

__________________________________________________________________________
Qualquer coisa post
 
Emoções
Rochª
   
Página(s): 1/1    


Seu Nome:

Seu eMail:

ALTERAR PARA MODO HTML
Mensagem:

[:)] = 
[:P] = 
[:(] = 
[;)] = 

HTML DESLIGADO

     
 VOLTAR

  



CyberWEB Network Ltda.    © Copyright 2000-2024   -   Todos os direitos reservados.
Powered by HostingZone - A melhor hospedagem para seu site
Topo da página