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 支持和反馈，获取有关如何接收支持和提供反馈的指南。