List(Of KeyValuePair(Of String, String))扩展方法失效求助

我来帮你理清这个问题哈，你遇到的编译器报错和扩展方法不生效的问题其实是关联在一起的，咱们一步步拆解解决：

为啥会报“无法将String转换为KeyValuePair”的错？ #

当你尝试用From { {"key 1", "value 1"}, ... }这种写法初始化列表时，编译器会把每一组{"key", "value"}识别成String()类型的数组，但你的列表元素是KeyValuePair(Of String, String)，编译器没有内置的转换规则能把字符串数组转成这个类型，所以直接抛出了转换错误。

让扩展方法生效，实现你想要的简洁初始化 #

你写的扩展方法逻辑是对的，但VB.NET对扩展方法的定义有严格要求——必须放在公共模块里，不能放在类中。这也是你的扩展方法没被编译器识别到的核心原因。

第一步：修正扩展方法的定义 #

把扩展方法放到一个公共模块中，同时确保导入System.Runtime.CompilerServices命名空间（Extension属性需要它）：

Imports System.Runtime.CompilerServices

Public Module KeyValueListExtensions
    <Extension()>
    Public Sub Add(list As IList(Of KeyValuePair(Of String, String)), key As String, value As String)
        list.Add(New KeyValuePair(Of String, String)(key, value))
    End Sub
End Module

注意：如果这个模块和你的代码不在同一个命名空间，记得在使用的地方导入对应的命名空间。

第二步：用简洁语法初始化列表 #

现在编译器就能识别到扩展的Add(String, String)方法了，你可以完全按照自己期望的方式初始化列表：

Dim myList = New List(Of KeyValuePair(Of String, String)) From {
    {"key 1", "value 1"},
    {"key 2", "value 2"}
}

集合初始化器会自动把每一组{"key", "value"}映射为调用你的扩展方法，帮你创建KeyValuePair实例并添加到列表中。

替代方案：不用扩展方法的简洁写法 #

如果你不想依赖扩展方法，也可以用.NET提供的静态方法简化KeyValuePair的创建：

Dim myList = New List(Of KeyValuePair(Of String, String)) From {
    KeyValuePair.Create("key 1", "value 1"),
    KeyValuePair.Create("key 2", "value 2")
}

这个方法从.NET Framework 4.7和.NET Core开始支持，能省去手动写构造函数的麻烦。

内容的提问来源于stack exchange，提问作者user1751825