ThreeDFormat 对象 (发布服务器)
代表形状的三维格式。
备注
不能应用三维格式,对某些类型的形状,如倾斜的形状。 属性中的大多数,这种形状的 ThreeDFormat 对象的方法将会失败。
使用 Shape.ThreeD 属性可返回 ThreeDFormat 对象。
示例
本示例设置应用于当前出版物中第一个形状的 3D 效果的深度、延伸颜色、延伸方向和照明方向。
Sub SetThreeDSettings()
Dim tdfTemp As ThreeDFormat
Set tdfTemp = _
ActiveDocument.Pages(1).Shapes(1).ThreeD
With tdfTemp
.Visible = True
.Depth = 50
.ExtrusionColor.RGB = RGB(255, 100, 255)
.SetExtrusionDirection _
PresetExtrusionDirection:=msoExtrusionTop
.PresetLightingDirection = msoLightingLeft
End With
End Sub
方法
属性
- 应用程序
- BevelBottomDepth
- BevelBottomInset
- BevelBottomType
- BevelTopDepth
- BevelTopInset
- BevelTopType
- ContourColor
- ContourWidth
- 深度
- ExtrusionColor
- ExtrusionColorType
- FieldOfView
- Parent
- Perspective
- PresetExtrusionDirection
- PresetLightingDirection
- PresetLightingSoftness
- PresetMaterial
- PresetThreeDFormat
- RotationX
- RotationY
- Visible
另请参阅
支持和反馈
有关于 Office VBA 或本文档的疑问或反馈? 请参阅 Office VBA 支持和反馈,获取有关如何接收支持和提供反馈的指南。
反馈
https://aka.ms/ContentUserFeedback。
即将发布:在整个 2024 年,我们将逐步淘汰作为内容反馈机制的“GitHub 问题”,并将其取代为新的反馈系统。 有关详细信息,请参阅:提交和查看相关反馈