例: Parent property (NotesDateTime - LotusScript®)

次の Visual Basic コードは NotesDateTime オブジェクトの親ユーザー名を表示します。

Private Sub DTParent_Click()
Dim s As New NotesSession
Dim dt As NotesDateTime
s.Initialize
Set dt = s.CreateDateTime(Today)
MsgBox dt.Parent.UserName, , "Parent user name"
End Sub