我有1个mdb数据库,有2个表,压力容器,常压容器。现在想通过COMBO1的选择来控制ADODC1与表的关联,并通过DATAGRID1来显示数据。下面是我的代码,
运行后combo1选择2时,出现实时错误 
对象'refresh'的方法'IAdodc'失败Private Sub Form_Load()
  Combo1.AddItem "a"
  Combo1.AddItem "ab"
  
    Adodc1.ConnectionString = "Provider=Microsoft.Jet.OLEDB.3.51;Persist Security Info=False;Data Source=C:\lbj.mdb"
    Adodc1.RecordSource = "压力容器"
    Set DataGrid1.DataSource = Adodc1  
    Adodc1.RefreshEnd Sub
Private Sub Combo1_click()
    Select Case Combo1.ListIndex
        Case 0
            Adodc1.RecordSource = "压力容器"
        Case 1
            Adodc1.RecordSource = "常压容器"
    End Select
  
   Adodc1.Refresh     
End Sub