Share via

Text property

  • Article

Returns or sets the text displayed in the specified shape. The shape must have an AutoShapeType property of geoShapeRectangle or a Type property of geoTextBox. Read/write String.

Applies to

Objects:  Shape

Syntax

object.Text

Parameters

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

Example

    Sub PutTextInBox()


  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 text box, and add some text to it
  Set objMap.Location = objLoc
  objMap.Shapes.AddTextbox objLoc, 50, 30
  objMap.Shapes.Item(1).Text = "Some text in the box"


  End Sub