For Each 循环和类型转换仅适用于匹配类型的对象

Question

是否有一种特殊的语法可以只遍历集合中某种类型的元素？

例如：

For Each number As Integer In {0, "string", 4.6, 7, someClassInstance}
Next

我想要一个与上面类似的语法，它只会循环遍历数组中的第一个和第四个元素。

但是，根据the documentation：

"元素的数据类型必须是group的元素的数据类型可以转换成它。"

所以我不能使用上面的语法来做这样的事情。

---

我在代码中处理的实际示例是：

Public MustInherit Class BaseClass
End Class

Public Class SubClass1 : Inherits BaseClass 
    Public x As Integer
End Class

Public Class SubClass2 : Inherits BaseClass
End Class

主代码：

Dim someList As List(Of BaseClass)

For Each instance In someList
    'Do something with instance.x
Next

所以我需要检查instance 是否属于SubClass1 类型，并在每次使用x 时进行转换。

---

我不久前向this question 询问了 Swift。我希望在 VB 中得到类似的答案。

Answer 1

没有“特殊语法”，因为异构集合通常不是 .Net 中的方法

不过，您可以使用OfType 根据某种类型“过滤”该集合：

For Each number In {0, "string", 4.6, 7, someClassInstance}.OfType(Of Integer)

注意：只有当 Option Strict 设置为 Off 时，代码才能编译，因为 Option Strict On 禁止隐式对象类型

关于编辑，当你有一个 base 集合时，必须检查派生类型通常是一种代码味道；这意味着在类层次结构中应该有一个必须覆盖/可覆盖的方法来处理它。