Refreshing a form

[vandanasridhar]

hi, myself vandana.
I m making a form for new joining of employees. it has almost 30 text boxes.
after clicking add button all feilds should be clear for new entry.
i m using 30 statements in form_load event as below
text1=""
text2=""
-
-
-
text30=""
i wanna know is their any other way to refresh our form.

[ansumansahu]

hi, myself vandana.
I m making a form for new joining of employees. it has almost 30 text boxes.
after clicking add button all feilds should be clear for new entry.
i m using 30 statements in form_load event as below
text1=""
text2=""
-
-
-
text30=""
i wanna know is their any other way to refresh our form.

You can write a single function that will have the list of all the textboxes and the .Text property of each control should be set to "".

thanks
ansuman sahu

[vijaydiwakar]

hi, myself vandana.
I m making a form for new joining of employees. it has almost 30 text boxes.
after clicking add button all feilds should be clear for new entry.
i m using 30 statements in form_load event as below
text1=""
text2=""
-
-
-
text30=""
i wanna know is their any other way to refresh our form.

Yes

 
private sub ClearAllTextBoxes()
dim Ctrl as control
for each ctrl in me
if typeof ctrl is textbox then ctrl.text=""
next
end sub
 

good luck

[samycbe]

if u want a employee master screen i can send that form to you......


samy

[markmcgookin]

Yes

 
private sub ClearAllTextBoxes()
dim Ctrl as control
for each ctrl in me
if typeof ctrl is textbox then ctrl.text=""
next
end sub
 

good luck

Hehe, excellent I never knew about that control class... cheers that's really useful.

[vandanasridhar]

Yes

 
private sub ClearAllTextBoxes()
dim Ctrl as control
for each ctrl in me
if typeof ctrl is textbox then ctrl.text=""
next
end sub
 

good luck

thanks. my problem is solved. i must say ur good luck worked well.
thx again.