返回介绍

Pattern 属性

发布于 2019-09-29 10:15:56 字数 4403 浏览 1154 评论 0 收藏 0

全部显示

返回或设置代表应用于指定填充对象或线条的图案的值。对于 FillFormat 对象,为 MsoPatternType,只读;对于 LineFormat 对象,为 MsoPatternType,可读写。

MsoPatternType 可以是下列 MsoPatternType 常量之一:
msoPattern10Percent
msoPattern20Percent
msoPattern25Percent
msoPattern30Percent
msoPattern40Percent
msoPattern50Percent
msoPattern5Percent
msoPattern60Percent
msoPattern70Percent
msoPattern75Percent
msoPattern80Percent
msoPattern90Percent
msoPatternDarkDownwardDiagonal
msoPatternDarkHorizontal
msoPatternDarkUpwardDiagonal
msoPatternDarkVertical
msoPatternDashedDownwardDiagonal
msoPatternDashedHorizontal
msoPatternDashedUpwardDiagonal
msoPatternDashedVertical
msoPatternDiagonalBrick
msoPatternDivot
msoPatternDottedDiamond
msoPatternDottedGrid
msoPatternHorizontalBrick
msoPatternLargeCheckerBoard
msoPatternLargeConfetti
msoPatternLargeGrid
msoPatternLightDownwardDiagonal
msoPatternLightHorizontal
msoPatternLightUpwardDiagonal
msoPatternLightVertical
msoPatternMixed
msoPatternNarrowHorizontal
msoPatternNarrowVertical
msoPatternOutlinedDiamond
msoPatternPlaid
msoPatternShingle
msoPatternSmallCheckerBoard
msoPatternSmallConfetti
msoPatternSmallGrid
msoPatternSolidDiamond
msoPatternSphere
msoPatternTrellis
msoPatternWave
msoPatternWeave
msoPatternWideDownwardDiagonal
msoPatternWideUpwardDiagonal
msoPatternZigZag

expression.Pattern

expression 必需。该表达式返回“应用于”列表中的一个对象。

说明

还可使用 Patterned 方法设置填充对象或线条的图案。

可用 BackColor 和 ForeColor 属性设置图案颜色。

示例

本示例将一个矩形添加至 myDocument 中,并使其填充图案与名为“rect1”的图形的填充图案相匹配。新矩形与“rect1”的填充图案相同,但颜色不必相同。图案颜色可用 BackColor 和 ForeColor 属性设置。

Set myDocument = ActiveDocument
With myDocument.Shapes
 pattern1 = .Item("rect1").Fill.Pattern
 With .AddShape(msoShapeRectangle, 100, 100, 120, 80).Fill
 .ForeColor.RGB = RGB(128, 0, 0)
 .BackColor.RGB = RGB(0, 0, 255)
 .Patterned pattern1
 End With
End With

本示例将一条带图案的线条添加至 myDocument

Set myDocument = ActiveDocument
With myDocument.Shapes.AddLine(10, 100, 250, 0).Line
 .Weight = 6
 .ForeColor.RGB = RGB(0, 0, 255)
 .BackColor.RGB = RGB(128, 0, 0)
 .Pattern = msoPatternDarkDownwardDiagonal
End With

如果你对这篇内容有疑问,欢迎到本站社区发帖提问 参与讨论,获取更多帮助,或者扫码二维码加入 Web 技术交流群。

扫码二维码加入Web技术交流群

发布评论

需要 登录 才能够评论, 你可以免费 注册 一个本站的账号。
列表为空,暂无数据
    我们使用 Cookies 和其他技术来定制您的体验包括您的登录状态等。通过阅读我们的 隐私政策 了解更多相关信息。 单击 接受 或继续使用网站,即表示您同意使用 Cookies 和您的相关数据。
    原文