[VB.NET] Connessione unica a database Access per lettura tabelle

[morom78]

ciao,
sono alle prime armi con vb2008 e sto creando un applicazione (stile gestionale) da questa applicazione sono costretto a leggere in sequenza anche 10 tabelle allocate tutte nello stesso db access 2003, per farlo attualmente apro e chiudo la connessione ogni volta che leggo il contenuto di 1 tabella, attualmente non mi sembra il metodo migliore, qui sotto vi ho allegato il codice che ora sto utilizzando e vi chiedo eventualmente come potrei modificarlo al fine di aprire 1 sola volta la connessione al db, leggere tutte le tabelle e poi richiudere il tutto.
(le tabelle una volta lette vengono caricate nel dataset da dove poi ne gestisco la lettura dei dati)
Grazie

   
Sub CreoDataSet(ByRef ObjDataSet As DataSet, ByVal NomeDb As String, ByVal StrSql As String, ByVal TabellaRoot As String, ByVal Parametrodata As String, ByVal ParametroInteger As String)
        'questa funzione si connette al db e ne restituisce il dataset per poterlo gestire in datagrid ecc ecc
        Dim ConnString As String
        ConnString = My.Resources.StringaConnessione
        ConnString = ConnString.Replace("|NomeDb|", NomeDb)
        Dim objDataAdapter As New OleDbDataAdapter(StrSql, ConnString)
        Using objConnection As New OleDbConnection(ConnString)
            objConnection.Open() 'apro connessione al db
            objDataAdapter.SelectCommand.Connection = objConnection
            objDataAdapter.Fill(ObjDataSet, TabellaRoot)
        End Using
        objDataAdapter = Nothing
    End Sub

[U235]

non ho capito, scusami...
potresti spiegarti meglio?