我是个初学者,请教怎样用源代码写data控件!!!

解决方案 »

  1.   

    以下代码可以代替Data 控件,rs就和Data1.Recordset是一样的Dim rs As DAO.Recordset
    Dim ss As DAO.Database
    Set ss = OpenDatabase(App.Path + "\xuanxiu.mdb")  '用DAO方式打开数据库,数据库为当前目录下的xuanxiu.mdb文件
    Set rs = ss.OpenRecordset("class")  '打开表class,这个表存放的被选课程名'需要引用这个  Microsoft ActiveX Data Objects 2.0 Library