如何添加 textbox /0/ 在 visual basic 2012

你必须画画 FIVE 文本字段I. ONE 表格上的按钮

/1/ 调整 a

Collection

在课堂上，

/2/ 什么时候

Form_Load

, 添加您的铭文

Collection

/3/ 您可以使用循环访问所有文本字段。

for

, 如以下代码所示

Dim AL As New Collection



Private Sub Form1_Load/ByVal sender As System.Object, ByVal e As System.EventArgs/ Handles MyBase.Load

 AL.Add/TextBox1/

 AL.Add/TextBox2/

 AL.Add/TextBox3/

 AL.Add/TextBox4/

 AL.Add/TextBox5/

End Sub



Private Sub Button1_Click/ByVal sender As System.Object, ByVal e As System.EventArgs/ Handles Button1.Click

 Dim i As Integer

 For i = 1 To AL.Count

 AL/i/.Text = "Hello"

 Next

End Sub

首先创建要更改的文本字段数量的列表，并以良好的方式命名它们。
--> 例子 :
-----> 我有三个具有以下名称的文本字段。 : "ttttaksa1", "asiuhi2", "EEFUGUYug3"
-----> 我们最后设置了房间 textbox, 所以我们可以打电话 mofidy 每个都是
他们按照他的号码
-----> 现在我们有 3 文本字段 , 我们将制作带有文本字段数的行列表。 : 在这种情况下： 3 数字 /NB : 该清单包括 STRINGS ! /
列表将如下所示： Dim n as New List /of string/=/{"1","2","3"}/
如果我们有 11 文本字段例如它将是如此 :

Dim n 作为一个新的名单 /线时间/=/{"1","2","3","4","5","6","7","8","9","10","11"}/

现在，如果你愿意的话 , 例如 , 更改前两个文本字段的文本 /ttttaska1 和 asiuhi2 / , 你需要做到这一点。 :

For Each textbox In Me.Controls



 For Each s As String In n



 If textbox.Name.ToString.EndsWith/n/ Then

 'Do what you want to your textbox ex : textbox.text="Anel"

 textbox.forecolor=Color.Blue

 End If



 Next

 Next

我希望它很有用，谢谢 :D
现在我制作游戏并卖掉它们，想加入我吗？ facebook : Waterfull Idr
祝你好运 :D

Dim textBoxTemp As TextBox

Dim stringData As String



For index = 0 To 23

 stringData = /"txtBoxReal" & index/

 textBoxTemp = CType/Me.Controls/stringData/, TextBox/

 textBoxTemp.Text = 0

Next