Form.SubdatasheetExpanded 属性 (Access)
使用 SubdatasheetExpanded 属性可以指定或确定表或查询中所有子数据表的保存状态。 读/写 Boolean。
语法
表达式。SubdatasheetExpanded
expression:表示 Form 对象的变量。
备注
默认值为 False。
若要通过使用 Visual Basic 设置 数据表 属性,必须先使用 DAO CreateProperty 方法创建属性。
当窗体处于数据表视图中时, SubdatasheetExpanded 和 SubdatasheetHeight 属性对子窗体控件生效。
示例
以下示例打开或关闭 “采购订单 ”窗体的子数据表扩展。
若要亲自尝试此示例,请在“设计”视图中打开包含子窗体 () ,在窗体的属性窗口中选择“加载时”属性框旁边的“生成器”按钮,将此代码粘贴到窗体的“Form_Load”事件 (删除对“采购订单”窗体) 的引用,然后在数据表视图中打开该窗体。
Dim strExpand As String
With Forms("Purchase Orders")
strExpand = InputBox("Expand subdatasheets? Y/N")
Select Case strExpand
Case "Y"
.SubdatasheetExpanded = True
Case "N"
.SubdatasheetExpanded = False
Case Else
MsgBox "Can't determine subdatasheet expansion state."
End Select
End With
支持和反馈
有关于 Office VBA 或本文档的疑问或反馈? 请参阅 Office VBA 支持和反馈,获取有关如何接收支持和提供反馈的指南。
反馈
https://aka.ms/ContentUserFeedback。
即将发布:在整个 2024 年,我们将逐步淘汰作为内容反馈机制的“GitHub 问题”,并将其取代为新的反馈系统。 有关详细信息,请参阅:提交和查看相关反馈