如果条件导致异常。如何纠正？

Question

我有以下代码：

For i = 0 To dt3.Rows.Count - 1

            If dt3.Rows(i).Item("tablename") <> oldtablename Then

                oldtablename = dt3.Rows(i).Item("tablename")

                *****SOME CODE HERE******

            Else

                *****SOME CODE HERE******
            End If


            If i = dt3.Rows.Count-1 Or oldtablename <> dt3.Rows(i + 1).Item("tablename") Then
                ''time to build up the query and execute it...
                query = query1 & query2 
                dtCDV = executequery(query)

            End If

        Next

最后一个IF导致异常，因为dt3.rows（i + 1）...如果到达最后一行，则大于行数。我需要在两种情况下执行条件的最后一个条件：

1）如果我们在for循环的最后一次迭代中 2）如果oldtablename与下一行中包含的变量不同（如果存在下一行...）

如何正确编写？

谢谢