ISIntStrings.Count

Description

The number of the of the string values.

Syntax

object.Count

Part	Attribute	Type	Description
`object`	Required	ISIntStrings	The `object` always implements the ISIntStrings interface

Restriction: This property is readonly.

Return Value

int

Example

Display the string list and its text presentation.

sub main
  Dim aHost
  Dim aLayout
  Dim aList

  Set aHost = Profile.CreateCDOFormHost
  aLayout = 0
  
  set aList = aHost.GetAccessionPatientTemplateList(0, aLayout)
  aList.Add "Default form", -1

  ShowList aList, "Patient prefs"
end sub

sub ShowList(aList, aCaption)
  Dim   Dim aText
  Dim i
  aText = aCaption & ":" & vbCrLf
  for i = 0 to aList.Count - 1
    aText = aText & aList.Item(i) & "(" & aList.Data(i) & ")" & vbCrLf
  next
  Profile.MessageBox aText
end sub

Note:

Version information

Added in v7.8.0