Examples: Parent property (NotesDateRange - LotusScript®)

This Visual Basic code displays the parent user name of a NotesDateRange object.

Private Sub DRParent_Click()
Dim s As New NotesSession
Dim dr As NotesDateRange
s.Initialize
Set dr = s.CreateDateRange
MsgBox dr.Parent.UserName, , "Parent user name"
End Sub