Export (0) Print
Expand All

DictionaryBase Class

Provides the abstract base class for a strongly typed collection of key/value pairs.

Namespace: System.Collections
Assembly: mscorlib (in mscorlib.dll)

'Declaration
<SerializableAttribute> _
<ComVisibleAttribute(True)> _
Public MustInherit Class DictionaryBase
	Implements IDictionary, ICollection, IEnumerable
'Usage
Dim instance As DictionaryBase

/** @attribute SerializableAttribute() */ 
/** @attribute ComVisibleAttribute(true) */ 
public abstract class DictionaryBase implements IDictionary, ICollection, 
	IEnumerable
SerializableAttribute 
ComVisibleAttribute(true) 
public abstract class DictionaryBase implements IDictionary, ICollection, 
	IEnumerable
Not applicable.

The foreach statement of the C# language (for each in Visual Basic) requires the type of each element in the collection. Since each element of the DictionaryBase is a key/value pair, the element type is not the type of the key or the type of the value. Instead, the element type is DictionaryEntry. For example:

For Each de As Dictionary Entry In myDictionary
  ...
Next myDE

The foreach statement is a wrapper around the enumerator, which only allows reading from, not writing to, the collection.

NoteNote:

Because keys can be inherited and their behavior changed, their absolute uniqueness cannot be guaranteed by comparisons using the Equals method.

Notes to Implementers: This base class is provided to make it easier for implementers to create a strongly typed custom collection. Implementers are encouraged to extend this base class instead of creating their own. Members of this base class are protected and are intended to be used through a derived class only.

The following code example implements the DictionaryBase class and uses that implementation to create a dictionary of String keys and values that have a Length of 5 characters or less.

Imports System
Imports System.Collections

Public Class ShortStringDictionary
   Inherits DictionaryBase

   Default Public Property Item(key As String) As String
      Get
         Return CType(Dictionary(key), String)
      End Get
      Set
         Dictionary(key) = value
      End Set
   End Property

   Public ReadOnly Property Keys() As ICollection
      Get
         Return Dictionary.Keys
      End Get
   End Property

   Public ReadOnly Property Values() As ICollection
      Get
         Return Dictionary.Values
      End Get
   End Property

   Public Sub Add(key As String, value As String)
      Dictionary.Add(key, value)
   End Sub 'Add

   Public Function Contains(key As String) As Boolean
      Return Dictionary.Contains(key)
   End Function 'Contains

   Public Sub Remove(key As String)
      Dictionary.Remove(key)
   End Sub 'Remove

   Protected Overrides Sub OnInsert(key As Object, value As Object)
      If Not GetType(System.String).IsAssignableFrom(key.GetType()) Then
         Throw New ArgumentException("key must be of type String.", "key")
      Else
         Dim strKey As String = CType(key, String)
         If strKey.Length > 5 Then
            Throw New ArgumentException("key must be no more than 5 characters in length.", "key")
         End If
      End If 
      If Not GetType(System.String).IsAssignableFrom(value.GetType()) Then
         Throw New ArgumentException("value must be of type String.", "value")
      Else
         Dim strValue As String = CType(value, String)
         If strValue.Length > 5 Then
            Throw New ArgumentException("value must be no more than 5 characters in length.", "value")
         End If
      End If
   End Sub 'OnInsert

   Protected Overrides Sub OnRemove(key As Object, value As Object)
      If Not GetType(System.String).IsAssignableFrom(key.GetType()) Then
         Throw New ArgumentException("key must be of type String.", "key")
      Else
         Dim strKey As String = CType(key, String)
         If strKey.Length > 5 Then
            Throw New ArgumentException("key must be no more than 5 characters in length.", "key")
         End If
      End If
   End Sub 'OnRemove

   Protected Overrides Sub OnSet(key As Object, oldValue As Object, newValue As Object)
      If Not GetType(System.String).IsAssignableFrom(key.GetType()) Then
         Throw New ArgumentException("key must be of type String.", "key")
      Else
         Dim strKey As String = CType(key, String)
         If strKey.Length > 5 Then
            Throw New ArgumentException("key must be no more than 5 characters in length.", "key")
         End If
      End If 
      If Not GetType(System.String).IsAssignableFrom(newValue.GetType()) Then
         Throw New ArgumentException("newValue must be of type String.", "newValue")
      Else
         Dim strValue As String = CType(newValue, String)
         If strValue.Length > 5 Then
            Throw New ArgumentException("newValue must be no more than 5 characters in length.", "newValue")
         End If
      End If
   End Sub 'OnSet

   Protected Overrides Sub OnValidate(key As Object, value As Object)
      If Not GetType(System.String).IsAssignableFrom(key.GetType()) Then
         Throw New ArgumentException("key must be of type String.", "key")
      Else
         Dim strKey As String = CType(key, String)
         If strKey.Length > 5 Then
            Throw New ArgumentException("key must be no more than 5 characters in length.", "key")
         End If
      End If 
      If Not GetType(System.String).IsAssignableFrom(value.GetType()) Then
         Throw New ArgumentException("value must be of type String.", "value")
      Else
         Dim strValue As String = CType(value, String)
         If strValue.Length > 5 Then
            Throw New ArgumentException("value must be no more than 5 characters in length.", "value")
         End If
      End If
   End Sub 'OnValidate 

End Class 'ShortStringDictionary


Public Class SamplesDictionaryBase

   Public Shared Sub Main()

      ' Creates and initializes a new DictionaryBase.
      Dim mySSC As New ShortStringDictionary()

      ' Adds elements to the collection.
      mySSC.Add("One", "a")
      mySSC.Add("Two", "ab")
      mySSC.Add("Three", "abc")
      mySSC.Add("Four", "abcd")
      mySSC.Add("Five", "abcde")

      ' Display the contents of the collection using For Each. This is the preferred method.
      Console.WriteLine("Contents of the collection (using For Each):")
      PrintKeysAndValues1(mySSC)

      ' Display the contents of the collection using the enumerator.
      Console.WriteLine("Contents of the collection (using enumerator):")
      PrintKeysAndValues2(mySSC)

      ' Display the contents of the collection using the Keys property and the Item property.
      Console.WriteLine("Initial contents of the collection (using Keys and Item):")
      PrintKeysAndValues3(mySSC)

      ' Tries to add a value that is too long.
      Try
          mySSC.Add("Ten", "abcdefghij")
      Catch e As ArgumentException
          Console.WriteLine(e.ToString())
      End Try

      ' Tries to add a key that is too long.
      Try
          mySSC.Add("Eleven", "ijk")
      Catch e As ArgumentException
          Console.WriteLine(e.ToString())
      End Try

      Console.WriteLine()

      ' Searches the collection with Contains.
      Console.WriteLine("Contains ""Three"": {0}", mySSC.Contains("Three"))
      Console.WriteLine("Contains ""Twelve"": {0}", mySSC.Contains("Twelve"))
      Console.WriteLine()

      ' Removes an element from the collection.
      mySSC.Remove("Two")

      ' Displays the contents of the collection.
      Console.WriteLine("After removing ""Two"":")
      PrintKeysAndValues1(mySSC)

    End Sub 'Main


    ' Uses the For Each statement which hides the complexity of the enumerator.
    ' NOTE: The For Each statement is the preferred way of enumerating the contents of a collection.
    Public Shared Sub PrintKeysAndValues1(myCol As ShortStringDictionary)
      Dim myDE As DictionaryEntry
      For Each myDE In  myCol
          Console.WriteLine("   {0,-5} : {1}", myDE.Key, myDE.Value)
      Next myDE
      Console.WriteLine()
    End Sub 'PrintKeysAndValues1


    ' Uses the enumerator. 
    ' NOTE: The For Each statement is the preferred way of enumerating the contents of a collection.
    Public Shared Sub PrintKeysAndValues2(myCol As ShortStringDictionary)
      Dim myDE As DictionaryEntry
      Dim myEnumerator As System.Collections.IEnumerator = myCol.GetEnumerator()
      While myEnumerator.MoveNext()
          If Not (myEnumerator.Current Is Nothing) Then
            myDE = CType(myEnumerator.Current, DictionaryEntry)
            Console.WriteLine("   {0,-5} : {1}", myDE.Key, myDE.Value)
          End If
      End While
      Console.WriteLine()
    End Sub 'PrintKeysAndValues2


    ' Uses the Keys property and the Item property.
    Public Shared Sub PrintKeysAndValues3(myCol As ShortStringDictionary)
      Dim myKeys As ICollection = myCol.Keys
      Dim k As String
      For Each k In  myKeys
          Console.WriteLine("   {0,-5} : {1}", k, myCol(k))
      Next k
      Console.WriteLine()
    End Sub 'PrintKeysAndValues3

End Class 'SamplesDictionaryBase 


'This code produces the following output.
'
'Contents of the collection (using For Each):
'   Three : abc
'   Five  : abcde
'   Two   : ab
'   One   : a
'   Four  : abcd
'
'Contents of the collection (using enumerator):
'   Three : abc
'   Five  : abcde
'   Two   : ab
'   One   : a
'   Four  : abcd
'
'Initial contents of the collection (using Keys and Item):
'   Three : abc
'   Five  : abcde
'   Two   : ab
'   One   : a
'   Four  : abcd
'
'System.ArgumentException: value must be no more than 5 characters in length.
'Parameter name: value
'   at ShortStringDictionary.OnValidate(Object key, Object value)
'   at System.Collections.DictionaryBase.System.Collections.IDictionary.Add(Object key, Object value)
'   at SamplesDictionaryBase.Main()
'System.ArgumentException: key must be no more than 5 characters in length.
'Parameter name: key
'   at ShortStringDictionary.OnValidate(Object key, Object value)
'   at System.Collections.DictionaryBase.System.Collections.IDictionary.Add(Object key, Object value)
'   at SamplesDictionaryBase.Main()
'
'Contains "Three": True
'Contains "Twelve": False
'
'After removing "Two":
'   Three : abc
'   Five  : abcde
'   One   : a
'   Four  : abcd


import System.*;
import System.Collections.*;

public class ShortStringDictionary extends DictionaryBase
{
    /** @property 
     */
    public String get_Value(String key)
    {
        return((String)(get_Dictionary().get_Item(key)));
    } //get_Value

    /** @property 
     */
    public void set_Value(String key,String value)
    {
        get_Dictionary().set_Item(key, value);
    } //set_Value
   
   
    /** @property 
     */
    public ICollection get_Keys()
    {
        return get_Dictionary().get_Keys();
    } //get_Keys
   
    /** @property 
     */
    public ICollection get_Values()
    {
        return get_Dictionary().get_Values();
    } //get_Values
   
    public void Add(String key, String value) 
    {
        get_Dictionary().Add(key, value);
    } //Add
   
    public boolean Contains(String key) 
    {
        return get_Dictionary().Contains(key);
    } //Contains
   
    public void Remove(String key) 
    {
        get_Dictionary().Remove(key);
    } //Remove
   
    protected void OnInsert(Object key, Object value) 
    {
        if (!key.GetType().Equals(Type.GetType("System.String"))) {
            throw new ArgumentException("key must be of type String.", "key");
        }
        else {
            String strKey = ((String)(key));
            if (strKey.length() > 5) {
                throw new ArgumentException("key must be no more than "
                    + "5 characters in length.", "key");
            }
        }  
        if (!value.GetType().Equals(Type.GetType("System.String"))) {
            throw new ArgumentException("value must be of type String.", 
                "value");
        }
        else {
            String strValue = (String)value;
            if (strValue.length() > 5) {
                throw new ArgumentException("value must be no more than "
                    + "5 characters in length.", "value");
            }
        }
    } //OnInsert
   
    protected void OnRemove(Object key, Object value) 
    {
        if (!key.GetType().Equals(Type.GetType("System.String"))) {
            throw new ArgumentException("key must be of type String.", "key");
        }
        else {
            String strKey = ((String)(key));
            if (strKey.length() > 5) {
                throw new ArgumentException("key must be no more than "
                    + "5 characters in length.", "key");
            }
        }
    } //OnRemove
   
    protected void OnSet(Object key, Object oldValue, Object newValue) 
    {
        if (!key.GetType().Equals(Type.GetType("System.String"))) {
            throw new ArgumentException("key must be of type String.", "key");
        }
        else {
            String strKey = (String)key;
            if (strKey.length() > 5) {
                throw new ArgumentException("key must be no more than "
                    + "5 characters in length.", "key") ;
            }
        }
        if (!newValue.GetType().Equals(Type.GetType("System.String"))) {
            throw new ArgumentException("newValue must be of type String.",
                "newValue") ;
        }
        else {
            String strValue = ((String)(newValue));
            if (strValue.length() > 5) {
                throw new ArgumentException("newValue must be no more than "
                    + "5 characters in length.", "newValue") ;
            }
        }
    } //OnSet
   
    protected void OnValidate(Object key, Object value) 
    {
        if (!key.GetType().Equals(Type.GetType("System.String"))) {
            throw new ArgumentException("key must be of type String.", "key");
        }
        else {
            String strKey = ((String)(key));
            if (strKey.length() > 5) {
                throw new ArgumentException("key must be no more than "
                    + "5 characters in length.", "key") ;
            }
        }   
        if (!value.GetType().Equals(Type.GetType("System.String"))) {
            throw new ArgumentException("value must be of type String.", 
                "value");
        }
        else {
            String strValue = ((String)(value));
            if (strValue.length() > 5) {
                throw new ArgumentException("value must be no more than "
                    + "5 characters in length.", "value") ;
            }
        }
    } //OnValidate
} //ShortStringDictionary

public class SamplesDictionaryBase
{
    public static void main(String[] args)
    {
        // Creates and initializes a new DictionaryBase.
        ShortStringDictionary mySSC =  new ShortStringDictionary();
      
        // Adds elements to the collection.
        mySSC.Add("One", "a");
        mySSC.Add("Two", "ab");
        mySSC.Add("Three", "abc");
        mySSC.Add("Four", "abcd");
        mySSC.Add("Five", "abcde");
    
        // Display the contents of the collection using while. This is the
        // preferred method.
        Console.WriteLine("Contents of the collection (using for):");
        PrintKeysAndValues1(mySSC);
    
        // Display the contents of the collection using the enumerator.
        Console.WriteLine("Contents of the collection (using enumerator):");
        PrintKeysAndValues2(mySSC);
    
        // Display the contents of the collection using the Keys property and
        // the Item property.
        Console.WriteLine("Initial contents of the collection (using Keys"
            + " and Item):");
        PrintKeysAndValues3(mySSC);
    
        // Tries to add a value that is too long.
        try {
            mySSC.Add("Ten", "abcdefghij");
        }
        catch(ArgumentException e) {
            Console.WriteLine(e.ToString());
        }
    
        // Tries to add a key that is too long.
        try {
            mySSC.Add("Eleven", "ijk");
        }
        catch(ArgumentException e) {
            Console.WriteLine(e.ToString());
        }
        Console.WriteLine();
    
        // Searches the collection with Contains.
        boolean b = mySSC.Contains("Three");
        Console.Write("Contains \"Three\": ");
        Console.WriteLine(b);
        b = mySSC.Contains("Twelve");
        Console.Write("Contains \"Twelve\": ");
        Console.WriteLine(b);
        Console.WriteLine();
    
        // Removes an element from the collection.
        mySSC.Remove("Two");
    
        // Displays the contents of the collection.
        Console.WriteLine("After removing \"Two\":");
        PrintKeysAndValues1(mySSC);
    }//main
   
    // Uses the for statement which hides the complexity of the enumerator.
    // NOTE: The for statement is the preferred way of enumerating the 
    // contents of a collection.
    public static void PrintKeysAndValues1(ShortStringDictionary myCol) 
    {
        String strValue;
        String strKeys[] = new String[myCol.get_Count()];
        myCol.get_Keys().CopyTo(strKeys,0);

        for (int iCtr = 0; iCtr < myCol.get_Count(); iCtr++){
            strValue = myCol.get_Value(strKeys[iCtr]);
            Console.WriteLine("   {0,-5} : {1}", strKeys[iCtr], strValue);
        }
        Console.WriteLine();
    } //PrintKeysAndValues1
   
    // Uses the enumerator. 
    // NOTE: The for statement is the preferred way of enumerating the 
    // contents of a collection.
    public static void PrintKeysAndValues2(ShortStringDictionary myCol) 
    {
        DictionaryEntry myDE;
        System.Collections.IEnumerator myEnumerator = myCol.GetEnumerator();
        while(myEnumerator.MoveNext()) {
            if ( myEnumerator.get_Current()  != null  ) {
                myDE =((DictionaryEntry)(myEnumerator.get_Current()));
                Console.WriteLine("   {0,-5} : {1}", myDE.get_Key(), 
                myDE.get_Value());
            }
        }
        Console.WriteLine();
    } //PrintKeysAndValues2
   
    // Uses the Keys property and the Value property.
    public static void PrintKeysAndValues3(ShortStringDictionary myCol) 
    {
        ICollection myKeys = myCol.get_Keys();
        IEnumerator myEnumerator = myKeys.GetEnumerator();
        while (myEnumerator.MoveNext()) {
            String k = myEnumerator.get_Current().ToString();
            Console.WriteLine("   {0,-5} : {1}", k, myCol.get_Item(k));
        }
        Console.WriteLine();
    } //PrintKeysAndValues3
} //SamplesDictionaryBase
 
/* 
This code produces the following output.

Contents of the collection (using while):
   Three : abc
   Five  : abcde
   Two   : ab
   One   : a
   Four  : abcd

Contents of the collection (using enumerator):
   Three : abc
   Five  : abcde
   Two   : ab
   One   : a
   Four  : abcd

Initial contents of the collection (using Keys and Item):
   Three : abc
   Five  : abcde
   Two   : ab
   One   : a
   Four  : abcd

System.ArgumentException: value must be no more than 5 characters in length.
Parameter name: value
   at ShortStringDictionary.OnValidate(Object key, Object value)
   at System.Collections.DictionaryBase.System.Collections.IDictionary.Add(
Object key, Object value)
   at SamplesDictionaryBase.Main()
System.ArgumentException: key must be no more than 5 characters in length.
Parameter name: key
   at ShortStringDictionary.OnValidate(Object key, Object value)
   at System.Collections.DictionaryBase.System.Collections.IDictionary.Add(
Object key, Object value)
   at SamplesDictionaryBase.Main()

Contains "Three": True
Contains "Twelve": False

After removing "Two":
   Three : abc
   Five  : abcde
   One   : a
   Four  : abcd

*/


System.Object
  System.Collections.DictionaryBase
     Derived Classes

Public static (Shared in Visual Basic) members of this type are thread safe. Any instance members are not guaranteed to be thread safe.

This implementation does not provide a synchronized (thread-safe) wrapper for a DictionaryBase, but derived classes can create their own synchronized versions of the DictionaryBase using the SyncRoot property.

Enumerating through a collection is intrinsically not a thread-safe procedure. Even when a collection is synchronized, other threads can still modify the collection, which causes the enumerator to throw an exception. To guarantee thread safety during enumeration, you can either lock the collection during the entire enumeration or catch the exceptions resulting from changes made by other threads.

Windows 98, Windows Server 2000 SP4, Windows Millennium Edition, Windows Server 2003, Windows XP Media Center Edition, Windows XP Professional x64 Edition, Windows XP SP2, Windows XP Starter Edition

The Microsoft .NET Framework 3.0 is supported on Windows Vista, Microsoft Windows XP SP2, and Windows Server 2003 SP1.

.NET Framework

Supported in: 3.0, 2.0, 1.1, 1.0

Community Additions

ADD
Show:
© 2014 Microsoft