VisWebPageSettings.GetPhysicalDimensions 方法

根據 eRes 參數中傳遞給方法的列舉螢幕解析度值，將螢幕寬度和高度的實際值（以像素為單位）放置在傳遞至方法的 pnWidth 和 pnHeight 變數中，作為參數。

語法

運算式。GetPhysicalDimensions (eRes， pnWidth， pnHeight)

運算式 傳回 VisWebPageSettings 物件的運算式。

參數

名稱 必要/選用 資料類型 描述
eRes 必要 VISWEB_DISP_RES 螢幕解析度值。
pnWidth 必要 Long 水平螢幕像素的數量。
pnHeight 必要 Long 垂直螢幕的像素數。

傳回值

Nothing

註解

例如，如果您傳入 eRes 的VISWEB_DISP_RES列舉螢幕解析度值 res1024x768，則會以 pnWidth 和 pnHeight 傳回值 1024 和 768。

範例

下列範例示範如何使用 GetPhysicalDimensions 方法來判斷對應至傳遞至方法的螢幕解析度的螢幕寬度和高度，作為第一個參數。

Public Sub GetPhysicalDimensions_Example() 
 Dim vsoSaveAsWeb As VisSaveAsWeb 
 Dim vsoWebSettings As VisWebPageSettings 
 Dim lngWidth As Long 
 Dim lngHeight As Long 
 
 Set vsoSaveAsWeb = Visio.Application.SaveAsWebObject 
 Set vsoWebSettings = vsoSaveAsWeb.WebPageSettings 
 
 vsoWebSettings.GetPhysicalDimensions res1280x1024, lngWidth, lngHeight 
 
 Debug.Print lngwidth; lngHeight 
End Sub

支援和意見反應

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

  • 上次更新時間：