|
|
|
|
|
|
|
|
Dicas
|
|
|
Visual Basic (ActiveX/Controles/DLL)
|
|
 |
Título da Dica: Alterando Propriedades de Controles (não Array) em um Loop
|
 |
|
|
|
Postada em 8/10/2000 por Webmaster
webmaster@vbweb.com.br
Digamos que você tenha 5 TextBoxes, cada um com um nome diferente (quer dizer, NÃO estaria formando um array). Então, vamos dizer que você presice desabilitar (.Enabled = False) todos eles. Como você faria?
'Você faria assim?:
Text1.Enabled = False
Text2.Enabled = False
Text3.Enabled = False
Text4.Enabled = False
Text5.Enabled = False
Deste modo até funcionaria, mas tem um modo mais fácil de se fazer isso... Veja:
Dim cObjeto As Control
For Each cObjeto In Controls
If TypeOf cObjeto Is TextBox Then
cObjeto.Enabled = False
End If
Next
A vantagem de se usar este método é que, caso você tenha MUITOS TextBoxes, o código ficaria, sem dúvida, menor. Com este método NÃO IMPORTA quantos nem quais são os nomes dos TextBoxes! Ele irá, no caso, desabilitar TODOS eles!
|
|
|
|
|
