Data1.DatabaseName = App.Path & "\database\db1.mdb"
Data1.RecordSource = "select number from class"
Set DBCombo1.DataSource = Data1
DBCombo1.DataField = department
书上是直接在界面将dbcombo的datasource设为data1,我用代码set DBCombo1.DataSource = Data1,为什么又说类型不符,该怎么改?这段代码应该能看懂要干什么吧,还有什么错,希望指出来,帮帮我