一、动态隐藏/显示Standard Cost列 #

直通查询的字段由后端存储过程返回，无需修改查询本身，直接操作子窗体的列控件即可：

• 打开窗体的On Open事件代码编辑器，添加以下逻辑：
  1. 获取子窗体的引用（假设子窗体控件名为subItemMasterBOM，请根据实际名称修改）
  2. 确认子窗体加载完成后，设置目标列的显示状态
     示例代码：

  Private Sub Form_Open(Cancel As Integer)
      Dim subForm As Form
      ' 等待子窗体加载完成
      DoEvents
      ' 获取子窗体引用
      Set subForm = Me.subItemMasterBOM.Form
      
      ' 针对数据表视图：通过字段名设置列隐藏（True为隐藏，False为显示）
      subForm.Controls("Standard Cost").ColumnHidden = False
      
      ' 针对连续/单一窗体视图：同时设置数据控件和标题标签的可见性
      ' subForm.Controls("txtStandardCost").Visible = False
      ' subForm.Controls("lblStandardCost").Visible = False
  End Sub
  

  注：如果子窗体是数据表视图，ColumnHidden属性直接控制列的显示；如果是其他视图，需要同时处理数据控件和对应的标题标签。

二、动态显示/隐藏子窗体本身 #

直接操作窗体上的子窗体控件Visible属性即可，逻辑可放在On Open事件或其他触发事件中：
示例代码：

Private Sub Form_Open(Cancel As Integer)
    ' 替换为你的判断逻辑（比如用户权限、参数开关等）
    Dim shouldShowSubForm As Boolean
    shouldShowSubForm = True
    
    Me.subItemMasterBOM.Visible = shouldShowSubForm
End Sub

关键注意事项 #

• 确保子窗体控件名称、内部控件/字段名称与实际一致，可通过Access设计视图查看
• 如果子窗体加载较慢，DoEvents语句可确保子窗体加载完成后再执行后续操作

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