[Resolvido]Como-se mexe com TAG

Boa noite meu caros.
Pesquisei por aqui e por fora, em vídeos em pesquisas avançados e não achei.
Como se mexe com TAG e como usa-la.
Não quero chamar editar todos os campos, quero ter um controle das tag "a", ou sejam todas as tag A serão boleadas e tambémoutras funções

Boa noite,

A Tag é a propriedade "Marca" do controle.
É isso que vc quer usar?

[]'s

FIM

Boa noite meu amigo, sim é isso mesmo.
Se ela mexe só com Números e string na verdade como mexer com esse  controle.
Busquei ate no seus anexos porque tinha lembrado de você ajudar um dos companheiro daqui, mas não achei

Ok.

Segue um pequeno exemplo de cadastro de cliente com as aplicações em tag (Marca).

Este é um bom exemplo pra vc estudar e entender suas funcionalidades.

Boa sorte

[]'s

FIM

Obrigado, vou estudar

Crysóstomo,

Não se esqueça de encerrar o tópico.

Valeu

[]'s

Fim

Ok, estou vendo a noite sobre essa tange refazendo os forms, os campos estão sem marcas não consigo fazer bloqueio das tags A
exemplo tenho 20 campos eu quero bloquear os campos que tenha as tags A.

Crysostomo,

Neste caso, vc não precisa utilizar tag nos campos, e o mais viável seria a utilização de Collection, ou seja, uma coleção.
A collection é um objeto onde você pode atribuir vários membrou/itens a este objeto, tornando um único objeto, e manipulá-lo da forma que desejar.

No mesmo exemplo que te mandei, vou implementar esta rotina e te mandar.

Aguarde.

[]'s

FIM

Crysostomo,

Aprovetei para dar uma incrementada no form utilizando algumas funções.

O conceito de TAG foi utilizado apenas nos botões.
O conceito de COLLECTION foi utilizada no tratamento dos campos.

O cadastro ficou assim:



Apenas para ilustrar o bloqueio de campos específicos, eu inclui  um grupo com os campos Campo1, Campo2 e Campo3, que são bloqueados quando acionar o botão "Novo", que chama uma função privada do form:

'-- Função privada do form que adiciona os membros em uma coleção
Private Function fLockControl()
Dim colecao As New Collection
   
   With colecao
       .Add Me.txtCampo1
       .Add Me.txtCampo2
       .Add Me.txtCampo3
   End With
   
   Call fncLockControlAux(Me, colecao) ==> Aqui é a chamada da função pública que desabilita os campos da coleção

End Function


Os campos obrigatórios, que se encontram com a borda em VERMELHO, também foram alterados atraves da função abaixo:


'-- Função que adiciona itens a coleção para mudar a borda do campo para vermelho (constante COR_BORDA)
Public Sub fCamposObrig()
Dim colecao As New Collection
   
   With colecao
       .Add Me.txtnomecli
       .Add Me.txtcpfcnpjcli
       .Add cbosexocli
   End With
   
   '-- Chamada da função publica que muda a cor da borda do campo adicionados a coleção
   Call fncRequiredFields(Me, colecao)

End Sub

Todas as funções públicas dos módulos estão com o prefixo "fnc", e as funções privadas do form estão com "f"

Procure estudar e debugar linha-a-linha do código para entender o que cada função executa.

Segue versão

Boa Sorte

Obrigado Alexandre.