Dim MyODA As OleDb.OleDbDataAdapter
        Dim Conn As String = "provider=Microsoft.jet.oledb.4.0;data source =学籍管理数据库.mdb"
        Dim MyConn As New OleDb.OleDbConnection(Conn)
        MyConn.Open()

        Dim commd As New Data.OleDb.OleDbCommand

        commd = MyConn.CreateCommand()

写这么多干什么?