Imports System.Data.OleDb

Public Class Form2

    Dim dbConn As New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Password=;User ID=Admin;Data Source=|DataDirectory|\myDatabase.mdb")

    Private Sub Form2_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

        loadTABLE()

    End Sub

    Private Sub loadTABLE()

        Dim commandString As String = "SELECT colonna1, colonna2, colonna3, colonnaXXX FROM nome_tabella"

        Dim myDataAdapter As New OleDbDataAdapter(commandString, dbConn)
        Dim myDataSet As New DataSet()

        myDataAdapter.Fill(myDataSet, "nome_tabella")

        Me.AnagraficaDataGridView.DataSource = myDataSet.Tables("nome_tabella").DefaultView

    End Sub

End Class