يرجى تعديل هذا الكود (عرض بيانات على الDataGrid )

يوجد على الفورم عدد 3 DataGrid ، و يوجد لدي عدد 3 جداول أكسس ، الكود التالي يعرض محتويات الجدول رقم 3 في جميع

الـDatagrid الموجودة .

أريد منكم تعديل الكود التالي بحيث يتم عرض محتويات كل جدول في datagrid .

جزاكم الله ألف خير .

Private Sub Command3_Click()

  sql = "select * from table1;"
  Adodc1.RecordSource = sql
  Adodc1.Refresh

  sql = "select * from table2;"
  Adodc1.RecordSource = sql
  Adodc1.Refresh

  sql = "select * from table3;"
  Adodc1.RecordSource = sql
  Adodc1.Refresh

End Sub