Word VBA教程:UserTextured方法

用一张图片的多份影像来填充指定图形。如果想用一张图片的大图像来填充图形,请用 UserPicture方法。

expression.UserTextured(TextureFile)

expression   必需。返回 FillFormat对象的表达式。

TextureFile   String 类型,必需。图片文件名。

VBA示例

本示例实现的功能是:将两个矩形添至活动文档。左侧的矩形用 Tiles.bmp 图片的一张大图像填充,右侧的矩形用 Tiles.bmp 图片的许多小图像填充。


Sub Texture()
    '  Windows NT and Windows2000 users need to
    '  specify a different explicit path to a bitmap
    '  file in the methods below.
    With ActiveDocument.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
End Sub

Word VBA教程

Word VBA参考教程:目录1 Word VBA参考教程:目录2
Word VBA参考教程:目录3 Word VBA参考教程:目录4
Word VBA参考教程:目录5 Word VBA参考教程:目录6
Word VBA参考教程:目录7 Word VBA参考教程:目录8
Word VBA参考教程:目录9 Word VBA参考教程:目录10
版权所有 © 中山市飞娥软件工作室 证书:粤ICP备09170368号