Visible property (LineFormat)
Returns or sets the visibility of the line on a shape. Read/write Boolean.
Applies to
Objects: LineFormat
Syntax
object.Visible
Parameters
Part | Description |
---|---|
object | Required. An expression that returns a LineFormat object. |
Example
Sub HideShapeBorder()
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 geoShapeOval, objLoc, 50, 30
'Fill the shape (make fill visible), change fill color,
' then remove the shape border
objMap.Shapes.Item(1).Fill.Visible = True
objMap.Shapes.Item(1).Fill.ForeColor = vbRed
objMap.Shapes.Item(1).Line.Visible = False
End Sub