我是VB.Net 2010,你看看能行不。
創(chuàng)新新互聯(lián),憑借10多年的成都網(wǎng)站設(shè)計(jì)、網(wǎng)站制作經(jīng)驗(yàn),本著真心·誠(chéng)心服務(wù)的企業(yè)理念服務(wù)于成都中小企業(yè)設(shè)計(jì)網(wǎng)站有上千案例。做網(wǎng)站建設(shè),選成都創(chuàng)新互聯(lián)。
Public Class Form1
Private MyTextBoxArray As New ArrayList
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim i As Integer
For i = 0 To 8 '利用循環(huán)語(yǔ)句動(dòng)態(tài)加入控件數(shù)組。
Dim FirstTextBox As New TextBox
'定義文本框?qū)ο?/p>
Me.Controls.Add(FirstTextBox)
'將一個(gè)文本框控件加入到Form上
MyTextBoxArray.Add(FirstTextBox)
'將文本框控件加入到例表集合中
MyTextBoxArray.Item(i).top = i * MyTextBoxArray.Item(i).height + 20 '修改新加入控件在Form上的位置
MyTextBoxArray.Item(i).left = 100
FirstTextBox.TabIndex = i
'修改新加入控件的TabIndex值
MyTextBoxArray.Item(i).text = "TextBox" i.ToString '修改默認(rèn)文本。
Next
End Sub
End Class
剛好我也在找,我找到了一個(gè),推薦!
1000本VB編程技術(shù)電子書(shū)專題下載:
VB.NET學(xué)習(xí)教程(PDF):
添加一個(gè)模塊,
然后把它復(fù)制粘貼到模塊里,
然后在窗體級(jí)調(diào)用。