TO
Tommy
November 12, 2002 11:37 AM UTC
' I found the solution myself, for anybody who is interested here´s the code:
' The values of the textboxes are loaded into arrays
Dim e As Variant, w As Variant
e = Array(Me.Textbox1, Me.Textbox2, Me.Textbox3, Me.Textbox4, Me.Textbox5, Me.Textbox6)
w = Array(Me.AnotherTextbox1, Me.AnotherTextbox2, Me.AnotherTextbox3, Me.AnotherTextbox4, Me.AnotherTextbox5, Me.AnotherTextbox6)
' Then the loop is done to check values in those boxes
Dim r As Integer
For r = 0 To 5
If e(r) <> "" And w(r) = "" Then
do something
End If
Next r