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

 

  Fórum

  Visual Basic
Voltar
Autor Assunto:  Colorir o text ao receber o foco
EWERTON
DIVINÓPOLIS
MG - BRASIL
ENUNCIADA !
Postada em 24/10/2006 16:46 hs            
Alguém sabe de alguma rotina de colorir o text ao receber o foco pois estou fazendo um a um ai não rende
   
ghost_jlp
Pontos: 2843 Pontos: 2843 Pontos: 2843 Pontos: 2843
SÃO PAULO
SP - BRASIL
ENUNCIADA !
Postada em 24/10/2006 17:15 hs            

se vc fizer um array dos textboxes creio q não precisa fazer um a um
Senão vc vai ter q fazer um a um... ou ao menos faça uma rotina q vc coloca no evento gotfocus...já q vai colocar um a um só copiar/colar.

coloca isso no gotfocus de cada text:

Call P_corTexto(Me, NomeTextBox)

Depois no módulo

Public sub P_corTexto(byval frm as Form,byval Nometxt as string )
dim objtxt as object

for each objtxt in frm.controls
 if typeof objtxt is TextBox then
  if objtxt.name = Nometxt then
   objtxt.forecolor = vbBlue
  else
   objtxt.forecolor = vbBLack
  endif
 endif
next
End Sub

Nem testei...mas tentae

   
Página(s): 1/1    


Seu Nome:

Seu eMail:

ALTERAR PARA MODO HTML
Mensagem:

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

HTML DESLIGADO

     
 VOLTAR

  



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