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