Message 1 of 4
How do I change Font Size and title the Text 45°? with I logic
- Mark as New
- Bookmark
- Subscribe
- Mute
- Subscribe to RSS Feed
- Permalink
- Report
I have this code ... but the font size is too small..I want it to be 50 mm, and rotatet the text box 45°
I would like to know how I can delete the skecht again as the last thing in the code.. and only the one the code have created
I
Dim oDrawDoc As DrawingDocument
oDrawDoc = ThisApplication.ActiveDocument
Dim oSketch As DrawingSketch
oSketch = oDrawDoc.ActiveSheet.Sketches.Add
oSketch.Edit
Dim oTG As TransientGeometry
oTG = ThisApplication.TransientGeometry
Dim sText As String
sText = "Drawing Notes"
Dim oTextBox As TextBox
oTextBox08A = oSketch.TextBoxes.AddFitted(oTG.CreatePoint2d(12, 12), "draft")
' Exit the sketch from the edit environment.
oSketch.ExitEdit