How to go through a bunch of text boxes in a form.

[Enterprise]

Hi,
I have 25 text boxes in a form. Lets say TB1 through TB25 are the Names of
the boxes. They have no controll sources. I want to be able to check whether
the text box is empty. Is there anyway I can do this in a loop? The only way
I can see to do this is to go if isempty(TB1) then...endif if
isempty(TB2)the n...endif which will involve 25 if statements. I was kind of
hoping to do this in a for loop if possible.

Thanks
P.S. Using ACCESS 2000

[Jim Allensworth]

On Fri, 16 Jul 2004 17:46:24 GMT, "Enterprise " <so*****@micros oft.com>
wrote:

Hi,
I have 25 text boxes in a form. Lets say TB1 through TB25 are the Names of
the boxes. They have no controll sources. I want to be able to check whether
the text box is empty. Is there anyway I can do this in a loop? The only way
I can see to do this is to go if isempty(TB1) then...endif if
isempty(TB2)th en...endif which will involve 25 if statements. I was kind of
hoping to do this in a for loop if possible.

Thanks
P.S. Using ACCESS 2000

This will loop through the forms controls collection and identify
textboxes.

Dim ctl As Control

For Each ctl In Me.Controls
If ctl.ControlType = acTextBox Then
If Len(ctl & "") = 0 Then
'Code here
End If
End If
Next
- Jim

[Randy Harris]

"Enterprise " <so*****@micros oft.com> wrote in message
news:Qv******** *********@newsr ead2.news.pas.e arthlink.net...

Hi,
I have 25 text boxes in a form. Lets say TB1 through TB25 are the Names of
the boxes. They have no controll sources. I want to be able to check whether the text box is empty. Is there anyway I can do this in a loop? The only way I can see to do this is to go if isempty(TB1) then...endif if
isempty(TB2)the n...endif which will involve 25 if statements. I was kind of hoping to do this in a for loop if possible.

Thanks
P.S. Using ACCESS 2000

For I = 1 To 25
If Len(Me("TB" & I) & "") = 0 Then
Debug.Print "TB" & I & " was empty."
Else
Debug.Print "TB" & I & " contained: " & Me("TB" & I)
End If
Next I

[Enterprise]

Thank you VERY much. I have been taught in my first programming class to
make code look nice...and this would do it. Somehow 25 if statements just
didn't seem like good programming at all :-)
"Enterprise " <so*****@micros oft.com> wrote in message
news:Qv******** *********@newsr ead2.news.pas.e arthlink.net...

Hi,
I have 25 text boxes in a form. Lets say TB1 through TB25 are the Names of
the boxes. They have no controll sources. I want to be able to check whether the text box is empty. Is there anyway I can do this in a loop? The only way I can see to do this is to go if isempty(TB1) then...endif if
isempty(TB2)the n...endif which will involve 25 if statements. I was kind of hoping to do this in a for loop if possible.

Thanks
P.S. Using ACCESS 2000

[J. Paul Schmidt]

Looping Through Fields In Unbound Forms
http://www.accessdatabasetips.com/lo...und-forms.html

Best regards,
J. Paul Schmidt, Freelance Access and ASP Web Developer
www.Bullschmidt.com
Classic ASP Design Tips, ASP Web Database Demo, ASP Bar Chart Tool...