>I was referring to the code in the second (SQL) example (comparing working to non-working versions)

For that part, the code should have been like this for the Data class:

                Using loSQLConnection As New SqlConnection(oApp.aConnection(nConnectionString, 1))
                     oCommand.Connection = loSQLConnection
                     oDataAdapter.Fill(oDataSet)
                End Using

                ' Adjust to our default name
                oDataSet.Tables("Table").TableName = "Temp"

                ' Record count
                nCount = oDataSet.Tables("Temp").Rows.Count

                oDataView = New DataView

                ' If we have no record
                If nCount = 0 Then
                    oRows = Nothing
                Else
                    oDataView = oDataSet.Tables("Temp").DefaultView
                    oRows = oDataSet.Tables("Temp").Rows()
                End If

And, then, from our application, where oData is the object to the data class:

                ' Sort the dataset into the primary key
                oData.oDataView.Sort = "AI"
 
                ' For each record
                For lnCounter = 0 To oData.nCount - 1
                    loRow = oData.oRows(lnCounter)

                Next