Ver Mensaje Individual
  #1 (permalink)  
Antiguo 06/01/2008, 21:51
NRLABS
 
Fecha de Ingreso: febrero-2002
Ubicación: Chile
Mensajes: 1.573
Antigüedad: 23 años, 2 meses
Puntos: 2
GotFocus,LostFocus, Multplies cambios (VB6)

Que tal foreros

Seguro que debe haber una mejor forma de hacer esto:
Tengo demasiados text box; y no los puedo agregar en una matriz porque pertecen a diferentes partes de un formulario..

Código PHP:
Private Sub opCasaMatriz_GotFocus()
opCasaMatriz.BackColor = &H80FFFF
End Sub
Private Sub opCasaMatriz_LostFocus()
opCasaMatriz.BackColor = &H8000000F
End Sub
Private Sub txtGiroEmpresa_GotFocus()
txtGiroEmpresa.BackColor = &H80FFFF
End Sub
Private Sub txtGiroEmpresa_LostFocus()
txtGiroEmpresa.BackColor = &HFFFFFF
End Sub

Private Sub txtNombreEmpresa_GotFocus()
txtNombreEmpresa.BackColor = &H80FFFF
End Sub
Private Sub txtNombreEmpresa_LostFocus()
txtNombreEmpresa.BackColor = &HFFFFFF
End Sub

Private Sub txtRutEmpresa_GotFocus()
txtRutEmpresa.BackColor = &H80FFFF
End Sub
Private Sub txtRutEmpresa_LostFocus()
txtRutEmpresa.BackColor = &HFFFFFF
End Sub

etc etc 
Osea, al llegar el foco, cambie a color amnarillo el fondo, y cuando se va.. vuelva a blanco.

Se entiende?

Saludos y gracias por su tiempo