次の方法で共有


VisWebPageSettings.GetPhysicalDimensions メソッド

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

構文

GetPhysicalDimensions (eRes, pnWidth, pnHeight)

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

パラメーター

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

戻り値

Nothing

注釈

たとえば、eResVISWEB_DISP_RES列挙された画面解像度値 res1024x768 を渡すと、値 1024 と 768 が pnWidthpnHeight で返されます。

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