|
Postada em 17/03/2005 16:09 hs
Bom pessoal, gostaria de saber se alguém pode me ajudar com outra forma de limpar os text que tenho? Eu faço da seguinte maneira: limpo campo por campo text1.text="" text2.text="" text3.text="" text4.text="" text5.text="" text6.text="" Porém ouvi falar que dessa forma se tem o mesmo resutado, mas está dando erro: For i = 1 to 6 text(i).text="" next Alguém pode me ajudar?
|
|
|
|
|
Postada em 17/03/2005 16:15 hs
tente For i = 0 to 5 text(i).text="" next
ANGUS TORMENTOR
|
|
|
Maxcim
|
GUARULHOS SP - BRASIL
|
|
ENUNCIADA !
|
|
|
Postada em 17/03/2005 16:59 hs
1º para usar o for.. Next o Textbox deveráser criando em forma de array ( txt(0),txt(1).... etc ai voce usa For i = 0 to 5 text(i).text="" next 2º pegar todos o txtbox do form Dim P_Objeto As Object For Each P_Objeto In Me.Controls If TypeOf P_Objeto Is TextBox Then P_Objeto.Text = "" End If Next P_Objeto
|
|
|
|
Postada em 17/03/2005 21:38 hs
olha o cod que vc descreveu acima da certo desde que seus objetos tenham o mesmo nome... assim vc pegaria as posicoes de acordo com o index da cada um
|
|
|
°Alquimista°
não registrado
|
|
Postada em 18/03/2005 15:58 hs
Valeu galerinha, Apesar da força que vocês estão dando o "For" continua dando erro. Caro Maxcim, o seu 2º exemplo deu certo, porém o 1º continua dando erro. Será que alguém poderia me ajudar na questão do "For"?
|
|
|