Hash Table فى الفيجوال بيسك دوت نت

يقوم Hash Table بتخزين البيانات بشكل مزدوج عبارة عن قيمة ومفتاح. يمكننا استرداد العناصر من Hash Table بتوفير المفتاح.

الدوال الشائعة فى استخدام Hash Table

Add : اضافة 

Syntax : HashTable.Add(Key,Value)

key : قيمة المفتاح

Value : القيمة المراد اضافتها

ContainsKey : التحقق من وجود مفتاح

Synatx : HashTable.ContainsKey(key)

Key : المفتاح المراد التحقق منه

ContainsValue : التحقق من وجود قيمة

Synatx : HashTable.ContainsValue(Value)

Value : القيمة المراد التحقق منها

Remove : حذف القيمة المحددة

Syntax : HashTable.Remove(Key)

Key : المفتاح المراد حذف قيمته

المثال التالى يوضح اهم الدوال فى استخدام Hash table

Public Class Form1
    Private Sub Button1_Click(ByVal sender As System.Object, 
 ByVal e As System.EventArgs) Handles Button1.Click
        Dim weeks As New Hashtable
        
        weeks.Add("1", "Sun")
        weeks.Add("2", "Mon")
        weeks.Add("3", "Tue")
        weeks.Add("4", "Wed")
        weeks.Add("5", "Thu")
        weeks.Add("6", "Fri")
        weeks.Add("7", "Sat")
        'عرض عنصر واحد
        MsgBox(weeks.Item("5"))
        'البحث عن عنصر
        If weeks.ContainsValue("Tue") Then
            MsgBox("Find")
        Else
            MsgBox("Not find")
        End If
        'حذف عنصر
        weeks.Remove("3")
        'عرض كل المفاتيح والقيم

        Dim day As DictionaryEntry        For Each day In weeks
            MsgBox(day.Key  "  --  "  day.Value)
        Next
    End Sub
End Class