VisWebPageSettings.GetPhysicalDimensions-Methode

Basierend auf dem aufgezählten Bildschirmauflösungswert, der an die -Methode im eRes-Parameter übergeben wird, platziert reale Werte für Bildschirmbreite und -höhe in Pixeln in den Variablen pnWidth und pnHeight , die als Parameter an die Methode übergeben werden.

Syntax

Ausdruck. GetPhysicalDimensions (eRes, pnWidth, pnHeight)

Ausdruck Ein Ausdruck, der ein VisWebPageSettings-Objekt zurückgibt.

Parameter

Rückgabewert

Nothing

Hinweise

Wenn Sie beispielsweise den VISWEB_DISP_RES aufgezählten Bildschirmauflösungswert res1024x768 für eRes übergeben, werden die Werte 1024 und 768 in pnWidth und pnHeight zurückgegeben.

Beispiel

Das folgende Beispiel zeigt, wie sie die GetPhysicalDimensions-Methode verwenden, um die Bildschirmbreite und -höhe zu bestimmen, die der Bildschirmauflösung entspricht, die als erster Parameter an die Methode übergeben wurde.

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

Support und Feedback

Haben Sie Fragen oder Feedback zu Office VBA oder zu dieser Dokumentation? Unter Office VBA-Support und Feedback finden Sie Hilfestellung zu den Möglichkeiten, wie Sie Support erhalten und Feedback abgeben können.