API Documentation > CorelDRAW > 2025-v26 > TextureFill > IVGTextureFill
TextureFill.TileWidth property
Gets or sets the Tile Width
Syntax:
Property Get TileWidth() As Double
Property Let TileWidth(ByVal Value As Double)
Remarks:
The TileWidth property returns or specifies the horizontal size, in document units, of the tile in a texture-fill pattern.
Examples:
The following VBA example applies a texture-fill pattern to a rectangle, such that the tile is repeated twice horizontally and three times vertically.
Sub Test()
Dim s As Shape
Dim tf As TextureFill
Set s = ActiveLayer.CreateRectangle(0, 0, 4, 4)
Set tf = s.Fill.ApplyTextureFill("Water Color")
tf.TileHeight = s.SizeWidth / 2
tf.TileWidth = s.SizeHeight / 3 
End Sub