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

 

  Fórum

  Visual Basic
Voltar
Autor Assunto:  Percorrer controles do form, indexados ou não
Scaliburth
BELO HORIZONTE
MG - BRASIL
ENUNCIADA !
Postada em 14/06/2018 03:30 hs            
Boa noite pessoal!!!

Que bom testemunhar que este forum permanece a todo vapor... há algum tempo não tenho tido tempo de entrar e acompanhá-lo em razão de mudança de função/profissão. Saudações a todos!!!

Contudo, em razão de uma necessidade de mudança de um sistema antigo, estou com uma dúvida que não consigo achar o caminho. Preciso percorrer todos os controles de um form e automatizar uma rotina para habilitar ou não determinado controle. Contudo, minha dúvida consiste a partir do momento que encontro controles indexados name(i).enabled e controles não indexados name.enabled.

Percorrer o form não é o problema, pois uso o código abaixo
For i = 0 To Me.Controls.Count - 1
If TypeOf Me.Controls(i) Is OptionButton Then
      'Aqui preciso saber se o OptionButton está indexado ou não, pois terei as duas situações e nomes diferentes para fazer uma busca diretamente pelo controle
      'Tentei várias formas Me.Controls(i).Name.item(i).caption, Me.Controls(i).Name.count para identificar se é ou não indexado, Me.Controls(i).Name.index, mas estou apanhando realmente
      ''Me.Controls(i).text = ""
ElseIf TypeOf Me.Controls(i) Is CommandButton Then
      'Aqui faria a mesma checagem com o commandbutton, pois no form há tanto controles indexados, como não indexados.
Else
      'Se não fosse nem um optionbutton, nem um commandbutton não preciso fazer nada
End If
Next

Se alguem puder me dar um help, fico agradecido.

Abraço a todos!!!
   
Página(s): 1/1    


Seu Nome:

Seu eMail:

ALTERAR PARA MODO HTML
Mensagem:

[:)] = 
[:P] = 
[:(] = 
[;)] = 

HTML DESLIGADO

     
 VOLTAR

  



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