Wie eine Notiz mit Attributen „ReminderTime“ erstellen

Question

ich eine Notiz mit Erinnerung erstellen möchten, ist dies mein Code:

'Create a note locally. 
Dim myNote As New Note() 

myNote.Title = "Sample note with Reminder set" 
myNote.Content = "Hello, world - this note has a Reminder on it." 
myNote.Attributes.ReminderTime = DateTime.Now.ToEdamTimestamp() 

'Create the note in the service, in the user's personal, default notebook. 
Dim store As ENNoteStoreClient =ENSessionAdvanced.SharedSession.PrimaryNoteStore 
Dim resultNote As Note = store.CreateNote(myNote) 

aber es hat nicht funktioniert. Der Fehlercode:

myNote.Attributes.ReminderTime = DateTime.Now.ToEdamTimestamp() 

Ausführliche Informationen:.

未处理 System.NullReferenceException HResult = -2147467261 Message = 未 将 对象 引用 设置 到 对象 的 实例

Answer 1

einer Note Attribute sind ein NoteAttributes Objekt, so dass Sie zuerst das Objekt erstellen müssen:

'Create a note locally. 
Dim myNote As New Note() 

myNote.Title = "Sample note with Reminder set" 
myNote.Content = "Hello, world - this note has a Reminder on it." 

'Create the note's attributes. 
Dim myNoteAttributes As New NoteAttributes 

myNoteAttributes.ReminderTime = DateTime.Now.ToEdamTimestamp() 
myNote.Attributes = myNoteAttributes  

'Create the note in the service, in the user's personal, default notebook. 
Dim store As ENNoteStoreClient =ENSessionAdvanced.SharedSession.PrimaryNoteStore 
Dim resultNote As Note = store.CreateNote(myNote)