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

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

        With Me.AnagraficaDataGridView
            .AllowUserToAddRows = False
            .AutoSizeColumnsMode = DataGridViewAutoSizeColumnsMode.Fill
            .EditMode = DataGridViewEditMode.EditProgrammatically
            .MultiSelect = False
            .SelectionMode = DataGridViewSelectionMode.FullRowSelect
            .RowHeadersVisible = False
        End With

        loadTABLE()

    End Sub

    Private Sub loadTABLE()

        Dim cmdString As String = "SELECT * FROM Anagrafica"

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

        myDataAdapter.Fill(myDataSet, "nome_tabella")

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

        Me.AnagraficaDataGridView.Columns(0).Visible = False
        Me.AnagraficaDataGridView.Columns(1).Visible = False
        Me.AnagraficaDataGridView.Columns(2).Visible = False

    End Sub