Bom dia,
Tenho um Formulário "Pedidos" onde nele coloquei os comandos abaixo p/ mudar a cor dos campos quando recebe/Perde o foco mas, não estou conseguindo usar os mesmos p/ mudar a cor dos campos no SubFormulário dele "ItensPedidos", onde os campos serião os "Produtos" e a "Quantidade".
Comandos usados:
Private Sub CombinaçãoFormecedor_GotFocus()
Me.CombinaçãoFormecedor.BackColor = RGB(255, 255, 153)
End Sub
e...
Private Sub CombinaçãoFormecedor_LostFocus()
Me.CombinaçãoFormecedor.BackColor = RGB(255, 255, 255)
End Sub
Como resolvo isso??
Desde já agradeço.
Tenho um Formulário "Pedidos" onde nele coloquei os comandos abaixo p/ mudar a cor dos campos quando recebe/Perde o foco mas, não estou conseguindo usar os mesmos p/ mudar a cor dos campos no SubFormulário dele "ItensPedidos", onde os campos serião os "Produtos" e a "Quantidade".
Comandos usados:
Private Sub CombinaçãoFormecedor_GotFocus()
Me.CombinaçãoFormecedor.BackColor = RGB(255, 255, 153)
End Sub
e...
Private Sub CombinaçãoFormecedor_LostFocus()
Me.CombinaçãoFormecedor.BackColor = RGB(255, 255, 255)
End Sub
Como resolvo isso??
Desde já agradeço.