次の例は、現在のデータベースのすべてのフォームの名前を表示します。
Sub Initialize Dim session As New NotesSession Dim db As NotesDatabase Set db = session.CurrentDatabase Forall form In db.Forms Messagebox form.Name End Forall End Sub