Forms Access-如何在子窗体中填充所有表的情况下创建下拉列表？

我有一个access DB，大约有20个表。我想创建一个表单，其中包含我所有表格的下拉菜单。当选择一个表时，我会试图让子窗体反映这些表中的信息

基本上，不用单击并打开每个表，而是在表单中查看它们。这可能吗

---

这可能吗？

您可以调用此子菜单来填充下拉菜单：

Private Sub Add_Tables_To_DropdownMenu()
  Dim T As TableDef

  For Each T In CurrentDb.TableDefs
    If (Left(T.Name, 4) <> "USys") And (T.Attributes = 0) Then
        Dropdownmenu0.AddItem T.Name
    End If
  Next
End Sub

Private Sub Dropdownmenu0_AfterUpdate()
    Subform1.SourceObject = "Table." & Dropdownmenu0.Value
End Sub