或许我对.NET还不够了解，但我还没有看到一个令人满意的方法来轻松地在.NET中实现这个简单的VB6代码（假设这个代码是在一个带有N个CommandButton数组Command1()和N个TextBox数组Text1()的表单上）：
Private Sub Command1_Click(Index As Integer)
Text1(Index).Text = Timer
End Sub
我知道这不是非常有用的代码，但它演示了在VB6中如何轻松使用控件数组。在C＃或VB.NET中最简单的等效方法是什么？
创建一个通用的文本框列表：
var textBoxes = new List<TextBox>();
// Create 10 textboxes in the collection
for (int i = 0; i < 10; i++)
{
var textBox = new TextBox();
textBox.Text = "Textbox " + i;
textBoxes.Add(textBox);
}
// Loop through and set new values on textboxes in collection
for (int i = 0; i < textBoxes.Count; i++)
{
textBoxes[i].Text = "New value " + i;
// or like this
var textBox = textBoxes[i];
textBox.Text = "New val " + i;
}
VB .NET 的另一个好处是具有处理多个控件的单个事件处理程序：
Private Sub TextBox_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) _
Handles TextBox1.TextChanged, _
TextBox2.TextChanged, _
TextBox3.TextChanged
End Sub
这正是关键所在。如果一个功能没有用处，为什么要有它呢？我知道这不是非常有用的代码
Private Sub Command_Click(sender As Object, e As EventArgs) Handles Command1.Click, Command2.Click …
Dim name As String = DirectCast(sender, Control).Name
Dim index As Integer = Integer.Parse(name.Substring("Command".Length))
Controls(String.Format("Text {0}", index)).Text = Timer.Value.ToString()
End Sub
List<YourControl> MyControlArray.
TextBox[] textboxes = new TextBox[] {
textBox1,
textBox2,
textBox3
};
在 .Net 中，同一个点击事件可以处理多个按钮的按下操作。然后，您可以将文本框添加到标记属性中以查找？
Private Sub AllButton_Click(sender As Object, e As EventArgs) Handles Button1.Click, Button2.Click, Button3.Click
Dim c As Control = CType(sender, Control)
Dim t As TextBox = FindControl(CType(c.Tag, String))
If t Is Not Nothing Then
t.Text = "Clicked"
End If
End Sub
我知道我的回答有点晚，但我认为我找到了解决方案。我不是唯一一个曾经遇到VS这个限制而苦苦挣扎的VB6开发人员。很久以前，我尝试迁移我设计的一个CRM，但失败了，因为我在一个表单中有数百个控件数组的严重依赖。我阅读了许多论坛，并能够编写出这个简单的代码：
VB.NET:
'To declare the List of controls
Private textBoxes As List(Of TextBox) = New List(Of TextBox)()
Private Sub Form1_Load(ByVal sender As Object, ByVal e As EventArgs)
'To get all controls in the form
For Each control In Controls
'To search for the specific type that you want to create the array
If control.[GetType]() = GetType(TextBox) Then
textBoxes.Add(CType(control, TextBox))
End If
Next
'To sort the labels by the ID
textBoxes = textBoxes.OrderBy(Function(x) x.Name).ToList()
End Sub
C#：
//To declare the List of controls
private List<TextBox> textBoxes = new List<TextBox>();
private void Form1_Load(object sender, EventArgs e)
{
//To get all controls in the form
foreach (var control in Controls)
{
//To search for the specific type that you want to create the array
if (control.GetType() == typeof(TextBox))
{
//To add the control to the List
textBoxes.Add((TextBox)control);
}
}
//To sort the labels by the ID
textBoxes = textBoxes.OrderBy(x => x.Name).ToList();
}
有三个要点需要考虑：
List将帮助您模拟大量控件的集合。typeof(Control)将帮助您定义要添加到列表中的控件类型。设计模式下的示例：
运行中：
类似的逻辑可能在其他技术中使用，如WPF、ASP.NET（Web Forms）或Xamarin（Forms）-在我看来。我希望这段代码能够帮助更多的程序员。