使用 SubdatasheetExpanded 屬性指定或判斷資料表或查詢內所有子資料工作表的儲存狀態。 可讀寫的 Boolean。
語法
運算式。SubdatasheetExpanded
expression 代表 Form 物件的變數。
註解
預設值為 False。
若要使用 Visual Basic 設定 SubdatasheetExpanded 屬性，您必須先使用 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 支援與意見反應。