共用方式為


Access) (Form.SubdatasheetExpanded 屬性

使用 SubdatasheetExpanded 屬性來指定或決定資料表或查詢中所有子資料工作表的儲存狀態。 可讀寫的 Boolean

語法

運算式SubdatasheetExpanded

expression 代表 Form 物件的變數。

註解

預設值為 False

若要使用 Visual Basic 設定 SubdatasheetExpanded 屬性,您必須先使用 DAO CreateProperty 方法建立屬性。

當表單在 [資料工作表檢視] 中時, SubdatasheetExpandedSubdatasheetHeight 屬性會在子表單控制項上生效。

範例

下列範例會開啟或關閉 [採購單 ] 表單的子資料工作表擴充。

若要自行嘗試此範例,請在 [設計檢視] 中開啟包含子表單) 的表單 (,選擇表單內容視窗中 [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 支援與意見反應