189 8069 5689
你有控件是没错，有方法也没错
在成都做网站、网站建设中从网站色彩、结构布局、栏目设置、关键词群组等细微处着手，突出企业的产品/服务/品牌，帮助企业锁定精准用户，提高在线咨询和转化，使成都网站营销成为有效果、有回报的无锡营销推广。成都创新互联专业成都网站建设10余年了，客户满意度97.8%，欢迎成都创新互联客户联系。
但是你没有为控件添加对应的委托，即没有把事件处理方法（Bt_Click）添加到控件的事件队列中去
你应该使用AddHandler语句，具体请查看MSDN
可以用循环来实现的，结合窗体的Controls属性，达到引用空间组的成员的目的
代码如下：
Private Sub command1_click()
Dim i As Long
For i = 1 To 10
Me.Controls("Label" i).Caption = i
Next i
End Sub
参照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中能通过，希望对你有帮助
因为foreach是通过迭代来工作的,当你删除了一个元素后,这个集合内部元素之间的关系就会被破坏,所以你得不到正确的结果
你最好用for循环,或者先将要删除的控件放到一个数组中,foreach结束之后,统一删除,
给你个多线程执行任务的例子
先添加BackgroundWorker1、TextBox1、Button1，都是标准控件（窗体）在工具箱中找
vb.net2008
Public Class Form1
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
BackgroundWorker1.WorkerReportsProgress = True '可以传值
BackgroundWorker1.WorkerSupportsCancellation = True '可以暂停
TextBox1.Text = "开始多任务"
Button1.Text = "0"
BackgroundWorker1.RunWorkerAsync() '调用多任务程序
End Sub
'多任务程序
Private Sub BackgroundWorker1_DoWork(ByVal sender As System.Object, ByVal e As System.ComponentModel.DoWorkEventArgs) Handles BackgroundWorker1.DoWork
System.Threading.Thread.Sleep(20000) '暂停时间，可以是你的非常耗时程序任务
BackgroundWorker1.ReportProgress(100) '传出0-100数值
End Sub
'接收传出数值
Private Sub BackgroundWorker1_ProgressChanged(ByVal sender As Object, ByVal e As System.ComponentModel.ProgressChangedEventArgs) Handles BackgroundWorker1.ProgressChanged
'TextBox1.Text = e.ProgressPercentage
TextBox1.Text = "结束多任务"
End Sub
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Button1.Text += 1
End Sub
End Class
在启动程序后可以不停点击Button1看到数值的增加而不会卡死，20秒后TextBox1就会改成"结束多任务"，实际上看你的程序是什么了，传值和接收传出数值的部分可取消