C# 到 VB.Net：为什么转换为 VB 时编译失败？

Question

我有这个 C# 扩展方法，它可以扩展任何 Value 类型为 IList 的字典。当我在 VB.Net 中编写等效代码时，出现以下编译错误：

“扩展方法 'Add' 有一些永远无法满足的类型约束”。

我觉得这真的很令人费解，因为 same 类型约束可以在 C# 中得到满足。

所以我的问题是：为什么这在 VB 中不起作用？有没有办法让这些相同的类型约束在 VB 中起作用？我是不是在转换代码时出错了？我希望有人能对此有所了解，因为我一直在摸索这个问题。 :)

（如果您好奇，扩展方法旨在简化在 single 键下将多个值添加到字典中（例如一个客户下的多个订单）。但这不重要，我只关心我在 VB 中观察到的令人费解的行为）。

这是可用的 C# 版本：

/// <summary>
/// Adds the specified value to the multi value dictionary.
/// </summary>
/// <param name="key">The key of the element to add.</param>
/// <param name="value">The value of the element to add. The value can be null for reference types.</param>
public static void Add<KeyType, ListType, ValueType>(this Dictionary<KeyType, ListType> thisDictionary, 
                                                     KeyType key, ValueType value)
where ListType : IList<ValueType>, new()
{
    //if the dictionary doesn't contain the key, make a new list under the key
    if (!thisDictionary.ContainsKey(key))
    {
        thisDictionary.Add(key, new ListType());
    }

    //add the value to the list at the key index
    thisDictionary[key].Add(value);
}

这是无法编译的 VB 版本：

''' <summary> 
''' Adds the specified value to the multi value dictionary. 
''' </summary> 
''' <param name="key">The key of the element to add.</param> 
''' <param name="value">The value of the element to add. The value can be null for reference types.</param> 
<System.Runtime.CompilerServices.Extension()> _
Public Sub Add(Of KeyType, ListType As {IList(Of ValueType), New}, ValueType) _
              (ByVal thisDictionary As Dictionary(Of KeyType, ListType), ByVal key As KeyType, ByVal value As ValueType)
    'if the dictionary doesn't contain the key, make a new list under the key 
    If Not thisDictionary.ContainsKey(key) Then
        thisDictionary.Add(key, New ListType())
    End If

    'add the value to the list at the key index 
    thisDictionary(key).Add(value)
End Sub

Answer 1

这里解释原因：http://msdn.microsoft.com/en-us/library/bb385206.aspx

在这种情况下，VB 编译器可能会更挑剔一些，因为它必须支持可选参数。 C# 中没有可选参数（目前）。

Answer 2

请注意，略有不同：

''' <summary> 
''' Adds the specified value to the multi value dictionary. 
''' </summary> 
''' <param name="key">The key of the element to add.</param> 
''' <param name="value">The value of the element to add. The value can be null for reference types.</param> 
<System.Runtime.CompilerServices.Extension()> _
Public Sub Add(Of KeyType, ListType As {New, IList(Of ValueType)}, ValueType) _
              (ByVal thisDictionary As Dictionary(Of KeyType, IList(Of ValueType)), ByVal key As KeyType, ByVal value As ValueType)
    'if the dictionary doesn't contain the key, make a new list under the key 
    If Not thisDictionary.ContainsKey(key) Then
        thisDictionary.Add(key, New ListType())
    End If

    'add the value to the list at the key index 
    thisDictionary(key).Add(value)
End Sub

您可以让Dictionary 包含ListType 列表，但它必须声明为(Of ..., IList(Of ...))。

Answer 3

仅当存在<System.Runtime.CompilerServices.Extension()> 时才会出现此问题。 VB 编译器强加了一个限制，即约束必须可以单独使用第一个参数进行验证。由于扩展方法的第一个参数 (Dictionary(Of KeyType, ListType)) 通过 IList(Of TValue) 约束依赖于第三个参数 (ValueType)，因此无法在 VB 中编译。

Answer 4

我怀疑问题在于您使用 ValueType 作为类型参数之一的名称，它是 .NET 类库 (System.ValueType) 中的实际类型。我可以想象 C# 和 VB.NET 以不同的方式处理这个问题。尝试使用不同的名称，例如 TValue（和 TKey 只是为了保持一致）。