參照VB6,在VB.net應(yīng)該也差不多
目前創(chuàng)新互聯(lián)公司已為超過千家的企業(yè)提供了網(wǎng)站建設(shè)、域名、網(wǎng)站空間、網(wǎng)站托管、服務(wù)器租用、企業(yè)網(wǎng)站設(shè)計、樂山網(wǎng)站維護(hù)等服務(wù),公司將堅持客戶導(dǎo)向、應(yīng)用為本的策略,正道將秉承"和諧、參與、激情"的文化,與客戶和合作伙伴齊心協(xié)力一起成長,共同發(fā)展。
方法一,讓它們形成控件數(shù)組
for i=1 to 5
textbox(i).text=1
next i
方法二,假設(shè)這些控件的名稱有規(guī)律,分別是textbox1,textbox2等
for i=1 to 5
controls("textbox" i ).text=1
next i
在VB6中能通過,希望對你有幫助
你有控件是沒錯,有方法也沒錯
但是你沒有為控件添加對應(yīng)的委托,即沒有把事件處理方法(Bt_Click)添加到控件的事件隊列中去
你應(yīng)該使用AddHandler語句,具體請查看MSDN
因為foreach是通過迭代來工作的,當(dāng)你刪除了一個元素后,這個集合內(nèi)部元素之間的關(guān)系就會被破壞,所以你得不到正確的結(jié)果
你最好用for循環(huán),或者先將要刪除的控件放到一個數(shù)組中,foreach結(jié)束之后,統(tǒng)一刪除,
可以用循環(huán)來實現(xiàn)的,結(jié)合窗體的Controls屬性,達(dá)到引用空間組的成員的目的
代碼如下:
Private Sub command1_click()
Dim i As Long
For i = 1 To 10
Me.Controls("Label" i).Caption = i
Next i
End Sub