understanding the code

[superracerx]

what does this code mean...

For Each oRow In tabItems.Row
If Trim$(tabItems.Cell(oRow.Index, 1)_ <>""Then
bAnyItms = True
Exit For

Thanxs

[DiGiTaIErRoR]

For Each oRow In tabItems.Row '(makes a loop = to the number of 'oRow's in tabItems)

If Trim$(tabItems.Cell(oRow.Index, 1)_ <> "" Then '(If the tabItems.Cell(oRow.index, 1) trimed(spaces removed from either sides of the string) then there's a string so make bAnyItms = true)

bAnyItms = True 'I think you know what this does
Exit For '(exit the loop)

------------------
DiGiTaIErRoR
VB, QBasic, Iptscrae, HTML
Quote: There are no stupid questions, just stupid people.