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

 

  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      Clique aqui para enviar email para o autor  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!
 


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