ScrollHeight、ScrollLeft、ScrollTop、ScrollWidth 屬性範例

以下範例使用 多頁 的頁面作為捲動區域。 使用者可利用 多頁面 第 2 頁的滾動條，存取頁面中未曾顯示的部分。

若要使用本範例，請將此範例程式碼複製到表單的宣告部分中。 確保表單包含一個名為 MultiPage1 的 多頁 ，且多 頁 的每一頁都包含一個或多個控制項。

注意事項

多頁的每一頁都是獨一無二的。 Page1 沒有捲動條。 Page2 有橫向和直向捲動條。

Private Sub UserForm_Initialize() 
 MultiPage1.Pages(1).ScrollBars = fmScrollBarsBoth 
 MultiPage1.Pages(1).KeepScrollBarsVisible = _ 
 fmScrollBarsNone 
 
 MultiPage1.Pages(1).ScrollHeight = 2 * _ 
 MultiPage1.Height 
 MultiPage1.Pages(1).ScrollWidth = 2 * _ 
 MultiPage1.Width 
 
 'Set ScrollHeight, ScrollWidth before setting 
 'ScrollLeft, ScrollTop 
 MultiPage1.Pages(1).ScrollLeft = _ 
 MultiPage1.Width / 2 
 MultiPage1.Pages(1).ScrollTop = _ 
 MultiPage1.Height / 2 
End Sub

支援和意見反應

有關於 Office VBA 或這份文件的問題或意見反應嗎？ 如需取得支援服務並提供意見反應的相關指導，請參閱 Office VBA 支援與意見反應。