如何比较自定义 class 类型

How to compare custom class type

基本上我想比较自定义 Class 类型

    Public Sub Add(items As SchoolTypes())

    Select Case items
        Case items.GetType() Is GetType(Programme)

        Case items.GetType() Is GetType(Etudiant)

        Case Else

    End Select
End Sub

这引发了错误:'Operator = is not defined' 我不知道如何解决....

编辑:当我锁定单个元素时

    Public Sub Add(items As SchoolTypes())

    Select Case items
        Case items(0).GetType() Is GetType(Programme)

        Case items(0).GetType() Is GetType(Etudiant)

        Case Else

    End Select
End Sub

仍然出现同样的错误..

我是个白痴,我的 select 陈述毫无意义

这是答案:

        Select Case items.GetType()
        Case GetType(Programme)

        Case GetType(Etudiant)

        Case Else

    End Select