Przykład kodu makra poziomu dokumentu w języku VB.NET

W środowisku IDE użyj przedstawionego poniżej kodu jako metody:

Public
Sub MyFirstMacroDocVB()
Dim
baseVec As Autodesk.Revit.DB.XYZ = Document.Application.Create.NewXYZ(1.0,
0.0, 0.0)Dim
upVec As Autodesk.Revit.DB.XYZ = Document.Application.Create.NewXYZ(0.0,
0.0, 1.0)Dim
origin As Autodesk.Revit.DB.XYZ = Document.Application.Create.NewXYZ(0.0,
0.0, 0.0)Dim
align As Autodesk.Revit.DB.TextAlignFlags = Autodesk.Revit.DB.TextAlignFlags.TEF_ALIGN_LEFT
Or Autodesk.Revit.DB.TextAlignFlags.TEF_ALIGN_TOPDim
pView As Autodesk.Revit.DB.View = Document.ActiveView Dim
Transaction As Autodesk.Revit.DB.Transaction = New Autodesk.Revit.DB.Transaction(Document, "NewTextNote")Transaction.Start()Document.Create.NewTextNote(pView,
origin, baseVec, upVec, lineWidth, align, strText)Transaction.Commit()
End Sub
Wskazówka: Należy pamiętać, że przed próbą uruchomienia projektu w Menedżerze makr należy go zbudować w środowisku Revit macro IDE.

W tym przykładzie należy zauważyć, że podczas budowania projektu w środowisku Revit macro IDE zostaje zbudowany projekt DocVisualBasic, a kod makra poziomu dokumentu napisany w języku VB.NET jest przechowywany w projekcie ThisDocument.vb. Za pomocą Eksploratora projektów można sprawdzić jego tymczasowe położenie na dysku. Należy pamiętać, że kody dla prawidłowo zbudowanych makr poziomu dokumentu są przechowywane w pliku RVT po zapisaniu pliku RVT. Pliki projektu są usuwane z położenia tymczasowego przy opuszczaniu programu Revit.

Pole tekstowe wstawione przez makro