Microsoft Scripting Runtime
Dictionary Collection / Count Property
In This Topic
    Count Property
    In This Topic
    Description
    Returns the number of items in a collection or Dictionary object.
    Property type
    Read-only property
    Syntax
    Visual Basic
    Public Property Count As Long
    Example
    The following code illustrates use of the Count property:
    function CountDemo()
    {
       var a, d, i, s;                 // Create some variables.
       d = new ActiveXObject("Scripting.Dictionary");   
       d.Add ("a", "Athens");          // Add some keys and items.
       d.Add ("b", "Belgrade");
       d.Add ("c", "Cairo");
       a = (new VBArray(d.Keys()));    // Get the keys.
       s = "";
       for (i = 0; i < d.Count; i++)   //Iterate the dictionary.
       {
          s += a.getItem(i) + " - " + d(a.getItem(i)) + "<br>";
       }
       return(s);                      // Return the results.
    }
    Function ShowKeys
       Dim a, d, i, s   ' Create some variables.
       Set d = CreateObject("Scripting.Dictionary")
       d.Add "a", "Athens"   ' Add some keys and items.
       d.Add "b", "Belgrade"
       d.Add "c", "Cairo"
       a = d.Keys   ' Get the keys.
       For i = 0 To d.Count -1 ' Iterate the array.
          s = s & a(i) & "<BR>" ' Create return string.
       Next
       ShowKeys = s
    End Function
    See Also