ISList.Add

Description

This function adds objects to the list.

Syntax

object.Add(aObject)

Part	Attribute	Type	Description
`object`	Required	ISList	The `object` always implements the ISList interface
`aObject`	In, Required	object	The object to be added to the list

Return Value

int

Returns the object from the list.

Example

Fill in the list with the user-selected patients and display the number of patients in the list and their full names.

Dim aList
Dim aPatient
Dim aMessage
Dim i

Set aList = Profile.CreateList

const aPatientCount = 2
for i = 1 to aPatientCount 
  set aPatient = Profile.SelectPatient
  aList.Add(aPatient)
next

aMessage = "The number of patients in the list is " &  aList.Count
for i = 0 to aList.Count - 1 
  set aPatient = aList.Item(i)
  aMessage = aMessage & vbNewLine & " - " & aPatient.SurnameFirstName
next

Profile.MsgBox(aMessage)

Note:

Version information

Added in v7.8.0