Ayuda Porfavor con VB 2008

[thegrimp]

LA CONEXION LA HAGO DE LA SIGUIENTE FORMA


Friend conn As OleDb.OleDbConnection ' Crear la conexion
Friend cadenaconn As String ' Cadena de conexion
'
Friend dbset As DataSet ' Contenedor DataSet
Friend dbadapter As OleDb.OleDbDataAdapter ' Vincular el Dataset con la tabla
Friend combu As OleDbCommandBuilder ' Permite actualizaciones automaticas


Friend Sub conectar()

cadenaconn = "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & CurDir() & "\Colegio.mdb"

Try
conn = New OleDb.OleDbConnection(cadenaconn)
My.Forms.MDIParent1.ToolStripStatusLabel.Text = "Conectado"
Catch ex As Exception
MessageBox.Show("Error al crear la conexión:" & vbCrLf & ex.Message)
End Try

End Sub

Friend Sub dsmini(Optional ByVal dbselect As String = "", Optional ByVal nomtab As String = "")
If dbselect = "" Then
MsgBox("Consulta Incorreta")
End If

If nomtab = "" Then
MsgBox("Falta el Nombre de la Tabla")
End If

dbset = New Data.DataSet
dbadapter = New OleDb.OleDbDataAdapter(dbselect, conn)

Try
dbadapter.Fill(dbset, nomtab)
Catch ex As Exception
MessageBox.Show("Error al Cargar los Datos :" & vbCrLf & ex.Message)
End Try

End Sub
End Module

ESPERO que alguien me puede decir que es lo q tengo q poner para vincular los campos en el Formulario
y hacer una actualizacion de la bd