参照VB6，在VB.net应该也差不多
目前创新互联公司已为超过千家的企业提供了网站建设、域名、网站空间、网站托管、服务器租用、企业网站设计、乐山网站维护等服务，公司将坚持客户导向、应用为本的策略，正道将秉承"和谐、参与、激情"的文化，与客户和合作伙伴齐心协力一起成长，共同发展。
方法一，让它们形成控件数组
for i=1 to 5
textbox(i).text=1
next i
方法二，假设这些控件的名称有规律，分别是textbox1,textbox2等
for i=1 to 5
controls("textbox" i ).text=1
next i
在VB6中能通过，希望对你有帮助
你有控件是没错，有方法也没错
但是你没有为控件添加对应的委托，即没有把事件处理方法（Bt_Click）添加到控件的事件队列中去
你应该使用AddHandler语句，具体请查看MSDN
因为foreach是通过迭代来工作的,当你删除了一个元素后,这个集合内部元素之间的关系就会被破坏,所以你得不到正确的结果
你最好用for循环,或者先将要删除的控件放到一个数组中,foreach结束之后,统一删除,
可以用循环来实现的，结合窗体的Controls属性，达到引用空间组的成员的目的
代码如下：
Private Sub command1_click()
Dim i As Long
For i = 1 To 10
Me.Controls("Label" i).Caption = i
Next i
End Sub