REFERENCIA A OBJETOS EM UM FORMULARIO
Ola, tenho um formulário com vários objetos variados e quero definir uma função para o pressionamento de uma tecla, mas tem que referenciar todos os objetos do formulário de uma vez senão não vai dar certo. Gostaria de saber como faço referencia de todos os objetos do formulário para fazer essa atribuição para ser executada no pressionamento de uma tecla dentro do formulário ou de algum objeto dele.
Muito simples:
Dim c As Control
For Each c In Form1.Controls
If TypeOf c Is CommandButton Then
c.BackColor = vbRed
End If
Next
Faça seu login para responder