منبع:https://barnamenevis.org/showpo...2&postcount=21

کاربرد : زمانی که نمیتوان از یک الگوریتم بازگشتی استفاده کرد؛ برای مثال کنترلها در Container های متفاوتی هستند و تنها تعداد خاصی از آنها باید Clear شوند.
کد:

Private Sub button1_Click(ByVal sender As Object, ByVal e As EventArgs) Handles Button1.Click
ClearControls(TextBox1, textBox2, comboBox1)
End Sub

Public Sub ClearControls(ByVal ctls As Control())
For Each ct As Control In ctls
ct.Text = ""
Next
End Sub