Private Sub FormParent_Click()
Dim s As New NotesSession
s.Initialize
Dim dir As NotesDbDirectory
Dim db As NotesDatabase
Dim form As NotesForm
Set dir = s.GetDbDirectory("")
Set db = dir.OpenDatabase("Web test")
Set form = db.GetForm("Main Document")
MsgBox form.Parent.Title, , "Title of parent"
End Sub

See Also

Parent property

Glossary