Bom dia,

Como apagar os labels q recebem dados sem apagar os labels indicativos???

Uso o seguinte código

 

 If TypeOf ctrlCampo Is label Then
   ctrlCampo.caption = ""
End If

 

O problema é q ela apaga tanto os campos q recebem dados como aqueles q indicam para q serve o campo.

Álguem pode me dar uma ajuda????

Agradeço desde já

 

se nao for muitos campos vc pode depois que limpar colocar os captions( indicacao) nos labels novamente.

 

call limpaControles

 

labellNome.caption = "Nome"

.....

.....

etc...

 

agora se for e melhor vc nao usar a sub que limpa tudo....

Olha nesses casos eu coloco uma parametro (uma string) no tag do objeto, no caso uma label.

 

Exemplo: uma label q indica um campo -> label1.tag = "C"

             uma label q recebe um dado -> label1.tag = ""

 

aí é bico :P

 

If TypeOf ctrlCampo Is label Then

   if ctrlCampo.tag = "" then ctrlCampo.caption = ""
End If

 

falows

 

vlw pela resposta