The description in the current language of Profile.
object.DisplayDescription
Part | Attribute | Type | Description |
---|---|---|---|
object |
Required | The object always implements the
ISToDoListFilter interface |
string
Display the number of theTo Do Items loaded on the basis of the selected filter and the description in the current language of Profile.
Dim aFilters
Dim aFilter
Dim aToDoItems
Dim aToDoItem
Dim aMessage
Set aFilters = Profile.GetToDoFilters
set aFilter = aFilters.ToDoListFilter(0)
set aToDoItems = Profile.LoadToDoItems(aFilter)
aMessage = "The Filter: " & aFilter.DisplayDescription
aMessage = aMessage & vbNewLine & "To Do Items Count = " & aToDoItems.Count
for each aToDoItem in aToDoItems
aMessage = aMessage & vbNewLine & " - " & aToDoItem.Description
next
Profile.MsgBox(aMessage)