Adodc4.RecordSource = "Select [单位] From 金岛大厦水表费用计算表 Union Select [单位] From 金岛大厦电表费用计算表 In '" & app.path & "\电费数据\金岛大厦电表费用计算表" & Combo1 & Combo2 & ".mdb '"
Adodc4.RecordSource = "Select [单位] From 金岛大厦水表费用计算表 Union Select [单位] From 金岛大厦电表费用计算表 In '" app.path & "\" & Combo1 & Combo2 & ".mdb '"
'程序与Access数据文件夹在同一目录下
.\Access数据文件夹\电费数据\金岛大厦电表费用计算表" & Combo1 & Combo2 & ".mdb '"
??????
你用了很多数据库吗?