AddMText Method

AddPointEntity Method →

Collapse All Expand All

InsertionPoint: A Point object representing the location to insert the text.

Description

Adds a multiline text entity in a rectangle defined by the insertion point and width of the text window.

Visual Basic
Public Function AddMText( _ ByVal InsertionPoint As Point, _ ByVal Width As Double, _ ByVal Text As String _ ) As MText

InsertionPoint: A Point object representing the location to insert the text.
Width: The width of the bounding box.
Text: The text to appear in the window.

Private Sub AddMtextExample()

' This example creates Mtext and adds it to the drawing using the

' AddMtext method.

Dim icadDoc As IntelliCAD.Document

Dim myText As String

Dim mtextObj As IntelliCAD.MText

Dim corner As IntelliCAD.Point

Dim width As Double

Set icadDoc = ActiveDocument

Set corner = Library.CreatePoint(0, 9)

width = 10

myText = "Test string for the AddMtext method"

' Add the mtext Object

Set mtextObj = icadDoc.ModelSpace.AddMText(corner, width, myText)

mtextObj.Update

ThisDocument.Application.ZoomExtents

End Sub