TEXTBOX

ALVARO.CAMPELO 08/03/2004 16:07:33
#14465
Gostaria de saber com fazer para limpar todos os campos texto de um form, sem utilizar text1 = "".
Eu sei que existe um procedimento para isso, e gostaria de utilizá-lo

vlw
USUARIO.EXCLUIDOS 08/03/2004 16:18:59
#14469 Resposta escolhida
Private sub LimpaTextos()
dim Ctl as Control

for each control in me.controls
if typeof ctl is textbox then ctl.text =Empty
next
end sub
USUARIO.EXCLUIDOS 08/03/2004 16:29:13
#14473
Private sub LimpaTextos()
dim Ctl as Control

for each ctl in me.controls *
if typeof ctl is textbox then ctl.text =Empty
next
end sub


*Tente este
o certo é ctl e não control na ,inha com asterisco
Desculpe
Tópico encerrado , respostas não são mais permitidas
Voltar