我用access做了一个库，里面有三个表A,B,C，在界面上我放了一个COMBO1，列表里面有A系列B系列C系列   ，我想我在COMBO1每点一个  就会自动导入其中对应的表   ，可是我编了好多天了还是不行。我很急！谁能帮帮我，我把我的程序贴出来。 谢谢！Q：928353636
Private Sub Form_Load()

'设置Adodc1的ConnectionString属性，建立与外部数据库蝶形弹簧数据.mdb的连接
Adodc1.ConnectionString = _
"Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\数据.mdb;"





  If Combo1.Text = "A系列" Then

'设置Adodc1的RecordSource属性，建立与数据表“A系列”的连接
Adodc1.RecordSource = "SELECT * FROM A系列"

'设置DataGrid1的DataSource属性，使DataGrid1用于显示A系列的数据表
Set DataGrid1.DataSource = Adodc1
  End If

  If Combo1.Text = "B系列" Then

'设置Adodc1的RecordSource属性，建立与数据表”B系列“的连接
Adodc1.RecordSource = "SELECT * FROM B系列"

'设置DataGrid1的DataSource属性，使DataGrid1用于显示B系列的数据表
Set DataGrid1.DataSource = Adodc1
  End If


  If Combo1.Text = "C系列" Then

'设置Adodc1的RecordSource属性，建立与数据表”C系列“的连接
Adodc1.RecordSource = "SELECT * FROM C系列"

'设置DataGrid1的DataSource属性，使DataGrid1用于显示C系列的数据表
Set DataGrid1.DataSource = Adodc1
  End If
End Sub