名前が重複するプロパティをまとめることは可能なのか

Question

名前が重複するオブジェクトはfindを使って以下のようにまとめられます。

        For r As Integer = 1 To 10
                Dim c As Control() = Me.Controls.Find("txtResult" & r, True)
                CType(c(0), TextBox).Text= "chokmah"
        Next

同じようにプロパティもfindを使ってまとめようとしてみたのですが、「型'Control'の値をList(Of String)に変換できません」とエラーが出ます。
そもそもプロパティをまとめるということ自体が不可能なことなのでしょうか。

以下のプロパティを↓

  Private _cnt1 As New List(Of String)
    Private _cnt2 As New List(Of String)
    Private _cnt3 As New List(Of String)
    Public Property pCnt1 As List(Of String)
        Get
            Return _cnt1
        End Get
        Set(value As List(Of String))
            _cnt1 = value
        End Set
    End Property

    Public Property pCnt2 As List(Of String)
        Get
            Return _cnt2
        End Get
        Set(value As List(Of String))
            _cnt2 = value
        End Set
    End Property

    Public Property pCnt3 As List(Of String)
        Get
            Return _cnt3
        End Get
        Set(value As List(Of String))
            _cnt3 = value
        End Set
    End Property

↓のようにまとめたら「c(0)」のところでエラーが出ます。

        For r As Integer = 1 To 3
            Dim c As Control() = Controls.Find("pCnt" & r, True)
            CType(c(0), List(Of String)).Add("binah")
        Next

よろしくお願いいたします。

Comments

[iwamoto_takaaki]

質問の意図がコードから読み取れません。
どのような意図があり、どうなることを期待して、どうしたら、どうなったかの下記恋をおねがいします。

Answer 1

「Controls.Find」はコントロールを探すメソッドなので、もちろんプロパティを探すなんて用途には使えません。そもそもプロパティとコントロールを同列に見ているということは、根本的な理解が足りないように見受けられます。以下のURLでオブジェクト(≒コントロール)、メソッド、プロパティがそれぞれ何なのかを解説しているので、ご一読されることをおすすめします。
参考URL1

また、プロパティをループで参照したい場合は「Type.GetProperties」を使うことになります。以下のURLが参考になるかと思うので、ご参照ください。
参考URL2
参考URL3

上記URLにあることと重複しますが、雰囲気的には以下のような感じかと思います。

Dim t As Type = GetType(MyNamespace.HogeClass)
For Each propInfo As PropertyInfo In t.GetProperties()
    If propInfo.Name.StartWith("pCnt") Then
        'ここで頑張る
    End If
Next