eu tenho ese codigo aki pra limpar a tela so naun funciona , a tbl, depois de limpada e alterada nao funciona ,

txtcod.Text = ""
    txtcodimo.Text = ""
    txtdescricao.Text = ""
    txtname.Text = ""

cara, eu não consegui entender muito bem o que tu quis dizer.... dá mais uma explicada...

queria limpar os txt do meu form sem deleta-los , so que com o codigo acima esta dano erro , esta limpando , mas quando eu altero os dados limpados da um erro pq naun altera

For each objeto in me

     if typeof objeto is TextBox then

        objeto.text = ""

     end if

next objeto

Isso vai deixar todas as tuas textBox sem texto, ou seja, limpas.

oq seria esse objeto q ta dano erro de variavel ?

Tá dando erro de variável pq vc não declarou, declare objeto como variant:

 

dim objeto as variant

or each objeto in me

Coloque assim mesmo no código. Se preferir pode ser assim:

 

dim i as integer

for i = 0 to me.controls.count - 1

    if typeof me.controls(i) is TextBox then

       me.controls(i).text = ""

    end if

next i