VisWebPageSettings.GetPhysicalDimensions メソッド

eRes パラメーターでメソッドに渡された列挙された画面解像度値に基づいて、パラメーターとしてメソッドに渡された pnWidth 変数と pnHeight 変数に画面の幅と高さの実際の値をピクセル単位で配置します。

構文

式。GetPhysicalDimensions (eRes, pnWidth, pnHeight)

式VisWebPageSettings オブジェクトを返す式。

パラメーター

名前 必須 / オプション データ型 説明
eRes 必須 VISWEB_DISP_RES 画面解像度の値。
pnWidth 必須 Long 水平画面のピクセル数。
pnHeight 必須 Long 縦方向の画面のピクセル数。

戻り値

Nothing

注釈

たとえば、eRes にVISWEB_DISP_RES列挙された画面解像度の値 res1024x768 を渡すと、値 1024 と 768 は pnWidth と pnHeight で返されます。

例

次の例は、 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 のサポートおよびフィードバックを参照してください。

  • Last updated on