共用方式為


Publisher (的 ThreeDFormat.Depth 屬性)

會傳回或設定 Variant 指出此圖形的立體化深度。 讀取/寫入。

語法

運算式深度

表達 代表 ThreeDFormat 物件的 變數。

傳回值

Variant

註解

數值會以 點為單位進行評估;字串可以是 Microsoft Publisher (支援的任何單位,例如「2.5 in」) 。

正值會產生以原始圖案為正面的立體化,負值則會產生以原始圖案為背面的立體化。 有效範圍介於 -600 到 9600 點之間,或是其他單位相等的距離。

範例

本範例在目前出版物中新增一個橢圓,然後指定該橢圓的立體化深度為 50 點,再將立體化部分設為紫色。

Dim shpNew As Shape 
 
Set shpNew = ActiveDocument.Pages(1).Shapes _ 
 .AddShape(Type:=msoShapeOval, _ 
 Left:=90, Top:=90, Width:=90, Height:=40) 
 
With shpNew.ThreeD 
 .Visible = True 
 .Depth = 50 
 .ExtrusionColor.RGB = RGB(255, 100, 255) 
End With 

支援和意見反應

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