Share via


Fill property

Returns a FillFormat object that contains the fill color and visibility properties for the specified shape. Read-only.

Applies to

Objects:  Shape

Syntax

object.Fill

Parameters

Part Description
object Required. An expression that returns a Shape object.

Example

    Sub FillRadiusWithColor()

  Dim objApp As New MapPoint.Application   Dim objMap As MapPoint.Map   Dim objLoc As MapPoint.Location
  'Set up application and get a location object   Set objMap = objApp.ActiveMap   objApp.Visible = True   objApp.UserControl = True   Set objLoc = objApp.ActiveMap.GetLocation(0, 0)
  'Create a shape at this location, then zoom to this location   Set objMap.Location = objLoc   objMap.Shapes.AddShape geoShapeRadius, objLoc, 30, 40
  'Use the Fill property to fill the shape   objMap.Shapes.Item(1).Fill.Visible = True
  End Sub