通过所有RadComboBox迭代并以形式vb.net为每个运行存储过程

Question

我有一个带有radcomoboxes的表单我需要在页面加载时用一些数据填充它我用存储过程做这个没问题。

但是我不想一个接一个地做，因为有31个我尝试这样的东西但是当它进入一个radcombobox时不能让每个人进入。

页面加载方法

Protected Sub Page_Load(sender As Object, e As System.EventArgs) Handles Me.Load
    If Not Page.IsPostBack Then
        GetName()
    End If
End Sub

这是我试图通过所有控件运行的方法，当它发现radcombobox调用方法但它永远不会

Private Sub GetName()
    Dim cControl As Control
    For Each cControl In Me.Controls
        If (TypeOf cControl Is RadComboBox) Then
            'this line of code never executes
            FillComentario(cControl)
        End If
    Next cControl
End Sub

此方法旨在接收radcombobox的ID并执行SP

Public Sub FillComentario(ByVal comentario As RadComboBox)
    lector = objBd.GetComentario()
    While lector.Read
        crearRcmb_Item(comentario, lector(0), lector(0))
    End While
End Sub

我的商店程序返回组合框的值列表

Public Function GetComentario() As SqlDataReader
    Return SqlHelper.ExecuteReader(conexion, Data.CommandType.StoredProcedure, "SP_GetComentario")
End Function

感谢您的帮助