Dim cnn As New OleDb.OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data
Source=C:\Documents and Settings\Administrador\Mis documentos\hola.mdb; User
Id=admin;Password=;")
    Dim da As New OleDb.OleDbDataAdapter("SELECT
* FROM Alumno", cnn)
    Dim ac As New OleDb.OleDbCommandBuilder(da)
    Dim ds As New DataSet
    Dim nuevo As DataRow
        da.Fill(ds)
       
DataGridview1.DataSource = ds.Tables(0)
