Visual Basic Customization

Visual Basic Customization

Active Member
Posts: 9
Registered: ‎08-13-2012
Message 1 of 2 (94 Views)

Quick question on text

94 Views, 1 Replies
08-21-2012 02:55 PM

As you guys can probably tell I am completely new to autocad and vba.  i was wondering if there is a way I can simply write a text in vba and give it a position along with the text height and have it placed at a point "TextPoint" in autocad.


Thanks a bunch

Posts: 173
Registered: ‎02-13-2011
Message 2 of 2 (84 Views)

Re: Quick question on text

08-22-2012 12:36 AM in reply to: richardv24

Acad text will do that why do you need programming for this? I suggest to you take look help menu.


From help menu...

Sub Example_AddText()
    ' This example creates a text object in model space.

    Dim textObj As AcadText
    Dim textString As String
    Dim insertionPoint(0 To 2) As Double
    Dim height As Double
    ' Define the text object
    textString = "Hello, World."
    insertionPoint(0) = 2: insertionPoint(1) = 2: insertionPoint(2) = 0
    height = 0.5
    ' Create the text object in model space
    Set textObj = ThisDrawing.ModelSpace.AddText(textString, insertionPoint, height)
End Sub


Post to the Community

Have questions about Autodesk products? Ask the community.

New Post
Do you have 60 seconds to spare? The Autodesk Community Team is revamping our site ranking system and we want your feedback! Please click here to launch the 5 question survey. As always your input is greatly appreciated.