Back to Methods Reference

Creates an MText entity in a rectangle defined by the insertion point and width of the bounding box.

Signature

VBA : RetVal = object.AddMText(InsertionPoint, Width, Text)

VL : RetVal = (vla-AddMtext object InsertionPoint Width Text)

(vla-AddMText mspace (vlax-3d-point apt) wt thestring)

• Object : ModelSpace Collection, PaperSpace Collection, Block
  The object or objects this method applies to.

• InsertionPoint : Variant (three-element array of doubles); input-only
  The insertion point of the mtext bounding box.

• Width : Double; input-only
  The width of the mtext bounding box.

• Text : String; input-only
  The actual text string for the MText object.

• RetVal : MText object
  The newly created MText object.

Example :

(defun c:al-addMText ()

(vl-load-com)

(setq mspace (vla-get-modelspace 
                 (vla-get-activedocument 
                      (vlax-get-acad-object))))

(setq apt (getpoint "\nInsertion Point: "))

(setq wt (getdist  apt "\nWidth : "))

(setq thestring (getstring T "\nText : "))

(setq theMText (vla-AddMText mspace (vlax-3d-point apt) wt thestring))

(princ)

);defun