Hashtable 类的属性和方法
下表列出了Hashtable类的一些常用属性-
属性 |
描述 |
Count |
获取哈希表中包含的键和值对的数量。 |
IsFixedSize |
获取一个值,该值指示Hashtable是否具有固定大小。 |
IsReadOnly |
获取一个值,该值指示哈希表是否为只读。 |
Item |
获取或设置与指定键关联的值。 |
Keys |
获取一个ICollection,其中包含哈希表中的键。 |
Values |
获取一个ICollection,其中包含Hashtable中的值。 |
下表列出了Hashtable类的一些常用方法--
方法 |
描述 |
Public Overridable Sub Add (key As Object, value As Object ) |
将具有指定键和值的元素添加到哈希表中。 |
Public Overridable Sub Clear |
从哈希表中删除所有元素。 |
Public Overridable Function ContainsKey (key As Object) As Boolean |
确定哈希表是否包含特定键。 |
Public Overridable Function ContainsValue (value As Object) As Boolean |
确定哈希表是否包含特定值。 |
Public Overridable Sub Remove (key As Object) |
从哈希表中删除具有指定键的元素。 |
示例:
Imports System.Collections
Module collections
Sub Main()
Dim ht As Hashtable = New Hashtable()
Dim k As String
ht.Add("001", "Zara Ali")
ht.Add("002", "Abida Rehman")
ht.Add("003", "Joe Holzner")
ht.Add("004", "Mausam Benazir Nur")
ht.Add("005", "M. Amlan")
ht.Add("006", "M. Arif")
ht.Add("007", "Ritesh Saikia")
If (ht.ContainsValue("Nuha Ali")) Then
Console.WriteLine("This student name is already in the list")
Else
ht.Add("008", "Nuha Ali")
End If
' Get a collection of the keys.
Dim key As ICollection = ht.Keys
For Each k In key
Console.WriteLine(" {0} : {1}", k, ht(k))
Next k
Console.ReadKey()
End Sub
End Module
尝试一下
编译并执行上述代码后,将产生以下结果-
002 : Abida Rehman
007 : Ritesh Saikia
001 : Zara Ali
003 : Joe Holzner
008 : Nuha Ali
004 : Mausam Benazir Nur
006 : M. Arif
005 : M. Amlan