Access表多值字段无法显示到窗体txtTRST文本框问题

你遇到的核心问题是多值字段（Multi-valued field）无法直接赋值给普通文本框——因为Access的多值字段本质是一个内嵌的Recordset2对象，而非单一字符串或数值，直接用Me.txtTRST = rstAM![TRSTeams]只会把对象引用赋值给文本框，自然呈现空白状态。

解决方案：遍历多值字段的内嵌记录集，拼接可显示字符串 #

我们需要先获取多值字段的内嵌记录集，遍历其中的每个选项，将它们拼接成逗号分隔的字符串后，再赋值给文本框。

修改你的VBA代码，替换原有的Me.txtTRST = rstAM![TRSTeams]行，替换为以下代码片段：

' 处理多值字段TRSTeams
Dim rstMulti As Recordset2
Dim trstValues As String

' 先检查多值字段是否为空，避免报错
If Not IsNull(rstAM![TRSTeams]) Then
    Set rstMulti = rstAM![TRSTeams].Value
    ' 遍历内嵌记录集，拼接所有选中的选项
    Do Until rstMulti.EOF
        ' 替换为你TRSTeams表中设置为"显示列"的字段名（比如团队名称）
        ' 如果需要获取存储的主键值，改用rstMulti![Value]
        trstValues = trstValues & rstMulti![TeamName] & ", "
        rstMulti.MoveNext
    Loop
    rstMulti.Close
    ' 移除最后多余的逗号和空格
    If Len(trstValues) > 0 Then
        trstValues = Left(trstValues, Len(trstValues) - 2)
    End If
End If
' 将拼接好的字符串赋值给文本框
Me.txtTRST = trstValues

关键细节说明： #

• rstAM![TRSTeams].Value 用于获取多值字段的内嵌记录集，类型为Recordset2，需要确保你的Access项目已引用Microsoft DAO 3.6 Object Library或更高版本（通常默认已启用）。
• 代码中的rstMulti![TeamName]需替换为你在TRSTeams表查找设置里指定的"显示列"字段名，这样才能显示用户能看懂的团队名称，而非后台存储的主键值。
• 加入空值判断是为了避免字段无选中项时出现运行错误。

额外建议： #

Access的多值字段虽然易用，但在VBA开发、数据查询和导出时会带来不少限制。如果项目需要长期维护，更推荐改用传统的一对多关系表设计：

1. 创建中间表（比如Application_Teams），存储Application的主键和对应TRSTeams的主键。
2. 用子窗体或列表框来展示关联的团队记录，这种方式更符合关系数据库规范，后续扩展和维护也更灵活。

内容的提问来源于stack exchange，提问作者D Dark2k