例: RemoveEntry method

次の例は、「Products」アウトラインから最初のエントリとその子エントリを削除します。

Dim session As New NotesSession
Dim db As NotesDatabase
Dim outline As NotesOutline
Dim entry As NotesOutlineEntry
Set db = session.CurrentDatabase
Set outline = db.GetOutline("Products")
Set entry = outline.GetFirst()
Call outline.RemoveEntry(entry)
Call outline.save()