For each not looping all rows

Hello,
In the below sub, I get the rowcount to 2, but the loop only goes through the for each once. Why is that?
tblTemp is a constant variable, that rows are added to in another sub.  Private Sub addTableRows()
Label1.Text = "-" & tblTemp.Rows.Count
Dim intCounLoops As Integer = 0
If tblTemp.Rows.Count > 0 Then
For Each tmpRow As TableRow In tblTemp.Rows
If tmpRow Is Nothing = False Then
tblEditableResult.Rows.Add(tmpRow)
Label1.Text &= "*..." & intCounLoops
Go to the complete details ...