Share via

Fill property

  • Article

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