UserTextured 方法

用平铺的小图像填充指定形状。如果要用一个大图像来填充该形状，请使用 UserPicture 方法。

expression  必选。该表达式返回一个 FillFormat 对象。

TextureFile  必选。String 类型。图片文件的名称。

示例

本示例向 myDocument 中添加了两个矩形。用 Tiles.bmp 文件中的一幅大图像填充左边的矩形；用 Tiles.bmp 文件中若干平铺的小图像填充右边的矩形

Set myDocument = ActivePresentation.Slides(1)
With myDocument.Shapes
    .AddShape(msoShapeRectangle, 0, 0, 200, 100).Fill _
        .UserPicture "c:\windows\tiles.bmp"
    .AddShape(msoShapeRectangle, 300, 0, 200, 100).Fill _
        .UserTextured "c:\windows\tiles.bmp"
End With