Passar Parametro Pra Function

[mestre fyoda]

tenho num form 3 campos e no outro 4 campos , No 1º form gostaria de chamar a função limpa para limpar todos os campos e no 2º form com 4 campos tb .

Teria como fazer uma função que identifica os campos do form e passa como parametro ?

[mariozneto]

Amigo, basta você informar qual é o form que ele se encarrega do resto, veja:

Public Sub LimparForm(F as Form)
Dim i as integer
 For i = 1 To F.Controls.Count - 1
  If TypeOf F.Controls(i) Is TextBox Then F.Controls(i).Text = ""
 Next i
End Sub

Falow... T+

[mestre fyoda]

é isso mesmo , eu me lembrava que tiva esse codigo aqui mas não sabia como pesquisar . vlw .

[mariozneto]

é isso mesmo , eu me lembrava que tiva esse codigo aqui mas não sabia como pesquisar . vlw .

OK!!!

Precisando é só postar!!!

Falow... T+