Visual Basic Dictionary Key Value Değerlerini Ters Çevirmek

"Visual Basic" Programlama dilinde "Dictionary Key Value Değerlerini Ters Çevirmek" ile ilgili kod örneği aşağıdadır.

Imports System
Imports System.Collections.Generic

Module Program
    Sub Main()
        Dim ascii_dict As New Dictionary(Of Char, Integer) From {
            {"A", 65},
            {"B", 66},
            {"C", 67},
            {"D", 68}
        }

        Dim new_dict As New Dictionary(Of Integer, Char)
        For Each entry In ascii_dict
            new_dict(entry.Value) = entry.Key
        Next

        For Each entry In new_dict
            Console.WriteLine("{0}: {1}", entry.Key, entry.Value)
        Next
    End Sub
End Module



İlginizi Çekebilir

Visual Basic Stringin Karakter Sayısını Bulmak

Visual Basic Bir Sayının 5'in Katı Olup Olmadığını Gösteren Örnek

Visual Basic 1'den N'e Kadar Olan Çift Sayıların Toplamını Bulma ...

Visual Basic Bir Derecenin Kosinüsünü Bulma

Visual Basic Bir Stringdeki Her Karakterin Sayısını Bulma Örneği