In the following code:

            Select Case tnConnType
                Case 1
                    oConnection = New OleDbConnection(tcConnection)
                    oDataAdapter = New OleDbDataAdapter
                    oCommand = New OleDbCommand
                    oDataParameter = New OleDbParameter
                    oDataReader = New OleDbDataReader
                    While loEnumerator.MoveNext
                        loParameter = loEnumerator.Current
                        oParameters2.Add(New OleDbParameter(loParameter(1, 1).ToString, loParameter(1, 2)))
                    End While

The line oDataReader cannot be processed as the interface reports:

Type 'System.Data.OleDb.OleDbDataReader' has not constructors.

Why is this working for the first four lines but not on the fifth?