Dim doc As NotesDocument
'...set value of doc...
If doc.IsNewNote Then
 Messagebox( "This document has not been saved. It's new." )
Else
 Messagebox( "This document has been saved. It's not new." )
End If

Véase también

IsNewNote property

Glosario