逐一查看控制項集合以尋找頁面上的 Web Form 控制項

參考引用來源MSDN:HOW TO：逐一查看控制項集合以尋找頁面上的 Web Form 控制項
--
Private Sub Button1_Click(ByVal sender As System.Object, _
 ByVal e As System.EventArgs) Handles Button1.Click
    Dim allTextBoxValues As String = ""
    Dim c As Control
    Dim childc As Control
    For Each c In Page.Controls
        For Each childc In c.Controls
            If TypeOf childc Is TextBox Then
                allTextBoxValues &= CType(childc, TextBox).Text & ","
            End If
        Next
    Next
    If allTextBoxValues <> "" Then
        Label1.Text = allTextBoxValues
    End If
End Sub