Word VBA教程:UserPicture方法



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

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


本示例将两个矩形添加到活动文档中。左面的矩形用 Tiles.bmp 图片的大图形来填充;右面的矩形用 Tiles.bmp 图片的多个小图像来填充。

Sub Pic()
    '  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号