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)