如何在VB.Net中声明一个带有字符串键和命名元组作为值的字典？

Imports System

Module Program
    Sub Main(args As String())
        ' 声明一个带有字符串键和命名元组作为值的字典
        Dim dict As New Dictionary(Of String, (String, Integer))()

        ' 添加元素到字典中
        dict.Add("key1", ("value1", 1))
        dict.Add("key2", ("value2", 2))
        dict.Add("key3", ("value3", 3))

        ' 访问字典中的元素
        Dim value1 = dict("key1")
        Console.WriteLine($"Value 1: {value1.Item1}, {value1.Item2}")

        ' 修改字典中的元素
        dict("key2") = ("new value2", 22)

        ' 遍历字典中的元素
        For Each kvp In dict
            Console.WriteLine($"Key: {kvp.Key}, Value: {kvp.Value.Item1}, {kvp.Value.Item2}")
        Next
    End Sub
End Module