次のスクリプトはアイテムの名前を取得します。Name プロパティは「Body」を返します。
Dim doc As NotesDocument Dim item As NotesItem Dim itemName As String '...set value of doc... Set item = doc.GetFirstItem( "Body" ) itemName = item.Name