Dim workspace As New NotesUIWorkspace Dim tunes As Variant tunes = workspace.GetListOfTunes() Dim messagestring As String Forall tunelist In tunes messagestring = messagestring & tunelist & Chr(10) End Forall Messagebox messagestring
For another example, please refer to the Alarms Dialog subform and the Calendar Profile form of the Mail template.
See Also