VisWebPageSettings.GetPhysicalDimensions-Methode

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

Syntax

Ausdruck verwendet werden. GetPhysicalDimensions (eRes, pnWidth, pnHeight)

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

Parameter

Rückgabewert

Nothing

Hinweise

Wenn Sie z. B. 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

Im folgenden Beispiel wird gezeigt, wie Sie die GetPhysicalDimensions-Methode verwenden, um die Bildschirmbreite und -höhe zu bestimmen, die der Bildschirmauflösung entsprechen, die an die Methode als erster Parameter übergeben wird.

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.