Access) (Form.SubdatasheetExpanded 屬性
使用 SubdatasheetExpanded 屬性來指定或決定資料表或查詢中所有子資料工作表的儲存狀態。 可讀寫的 Boolean。
語法
運算式。SubdatasheetExpanded
expression 代表 Form 物件的變數。
註解
預設值為 False。
若要使用 Visual Basic 設定 SubdatasheetExpanded 屬性,您必須先使用 DAO CreateProperty 方法建立屬性。
當表單在 [資料工作表檢視] 中時, SubdatasheetExpanded 和 SubdatasheetHeight 屬性會在子表單控制項上生效。
範例
下列範例會開啟或關閉 [採購單 ] 表單的子資料工作表擴充。
若要自行嘗試此範例,請在 [設計檢視] 中開啟包含子表單) 的表單 (,選擇表單內容視窗中 [On Load] 屬性方塊旁邊的 [建立器] 按鈕,將此程式碼貼到表單的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 支援與意見反應。