NullReferenceException al llenar un DataSet

Hola Grupo:

Tengo esta función que la utilizo para llenar un DataSet. Y me lanza una
excepción, aunque no siempre la está lanzando.
La excepción es la siguiente:

"Excepción no controlada del tipo System.NullReferenceException"
"Referencia a objeto no establecida como instancia de un objeto"

Private Function Obtener_Dataset(ByVal sql As String, ByVal Tabla As
String) As DataSet

Dim DAAux As OleDb.OleDbDataAdapter
Dim DbCAux As OleDb.OleDbCommand
Dim DSPreg As New DataSet

DAAux = New OleDb.OleDbDataAdapter

DbCAux = New OleDb.OleDbCommand(sql, BDConect)
DbCAux.CommandTimeout = 30

DAAux.SelectCommand = DbCAux

DAAux.Fill(DSPreg, Tabla.ToString) <- LA EXCEPCION ME
LA MARCA EN ESTA LINEA

Return DSPreg

End Function

He intentado aislar porque ocurre el error y no he encontrado nada. A
ver si alguien me puede orientar por donde buscar información o me puede
decir cual es la solución porque yo no lo veo.

Un saludo:

Manuel C.