ms-access-2007 - MS Access - 删除找不到的关系

Question

我正在尝试将文本字段更改为数字字段，但是，任何更改尝试都会遇到相同的错误。显然，该字段是关系的一部分。我已经查看了所有内容。关系窗口显示与该字段没有连接。我选择了显示“所有关系”按钮，但仍然没有。另一个类似的问题说在报告中发现了这种关系，但我还没有创建任何报告。我可以将所有内容复制到一个新项目中，甚至可以删除并重新创建一张表，但如果有人可以帮助我，我更愿意在这里学习一些东西。

Answer 1

您可以使用 VBA 检查 Relations 集合。我不知道它是否会识别你失踪的关系，但它应该很容易找到。

将此代码粘贴到标准模块中，运行它，并在立即窗口中查看输出:

Public Sub InspectRelations()
    Dim rel As DAO.Relation
    Dim fld As DAO.Field
    For Each rel In CurrentDb.Relations
        Debug.Print "Relationship Name: " & rel.Name
        Debug.Print "Table: " & rel.Table
        Debug.Print "ForeignTable: " & rel.ForeignTable
        For Each fld In rel.Fields
            Debug.Print "Field Name: " & fld.Name
            Debug.Print "ForeignName: " & fld.ForeignName
        Next fld
        Debug.Print String(10, "-")
    Next rel
    Set fld = Nothing
    Set rel = Nothing
End Sub