Параметры типа нельзя использовать в качестве квалификаторов
VB.Net2005
Упрощенный код:
MustInherit Class InnerBase(Of Inheritor)
End Class
MustInherit Class OuterBase(Of Inheritor)
Class Inner
Inherits InnerBase(Of Inner)
End Class
End Class
Class ChildClass
Inherits OuterBase(Of ChildClass)
End Class
Class ChildClassTwo
Inherits OuterBase(Of ChildClassTwo)
End Class
MustInherit Class CollectionClass(Of _
Inheritor As CollectionClass(Of Inheritor, Member), _
Member As OuterBase(Of Member))
Dim fails As Member.Inner ' Type parameter cannot be used as qualifier
Dim works As New ChildClass.Inner
Dim failsAsExpected As ChildClassTwo.Inner = works ' type conversion failure
End Class
Сообщение об ошибке в строке «сбой» находится в теме, а «Member.Inner» выделяется. Кстати, такая же ошибка возникает при попытке вызвать общий метод OuterBase.
Линия «работает» работает, но в реальной жизни существует дюжина (и их количество растет) классов ChildClass.
Строка «failsAsExpected» предназначена для того, чтобы показать, что с универсальными шаблонами каждый ChildClass имеет свой собственный отдельный внутренний класс.
Мой вопрос: есть ли способ получить переменную в классе CollectionClass, определенную как тип Member.Inner? какая критическая разница, которой не может следовать компилятор?
(В конце концов мне удалось сгенерировать объект, создав фиктивный объект типа param и вызвав метод, определенный в OuterBase. Не самый чистый подход.)
Отредактируйте измененный код 2008/12/2, чтобы сделать два «базовых» класса универсальными.
Ответы 2
Dim succeeds as OuterBase.Inner
.net имеет нет комбинацию классов шаблонов и определений типов C++, что означает, что то, что вы пытаетесь сделать, невозможно, и это даже не имеет смысла в .net.
ChildClass.Inner и SomeOtherChildClass.Inner относятся к одному типу. Вот короткая, но полная программа для демонстрации:
Imports System
MustInherit Class InnerBase
End Class
MustInherit Class OuterBase
Class Inner
Inherits InnerBase
End Class
End Class
Class ChildClass
Inherits OuterBase
End Class
Class OtherChildClass
Inherits OuterBase
End Class
Class Test
Shared Sub Main()
Dim x as new ChildClass.Inner
Dim y as new OtherChildClass.Inner
Console.WriteLine(x.GetType())
Console.WriteLine(y.GetType())
End Sub
End Class
Результат:
OuterBase+Inner
OuterBase+Inner
Чего вы пытались достичь, используя «параметризованные» вложенные классы? Я подозреваю, что либо не будет работать так, как вы хотели бы, или же вы можете добиться этого, просто используя OuterBase.Inner для начала.
Теперь, если бы каждый из ваших дочерних классов объявлял свой собственный вложенный класс, это была бы другая ситуация, и дженерики вам не помогли бы.
Конечно, ты прав. Почему-то я неправильно истолковал код, думая, что OuterBase является универсальным - что делает ChildClass: OuterBase <T> + InnerClass отличным от OtherChildClass: OuterBase <S> + InnerClass.