也许我只是不太了解.NET，但是我还没有看到一种令人满意的方法来在.NET中轻松实现此简单的VB6代码(假设此代码位于数组Command1()和N中的N CommandButtons的窗体上)数组Text1()中的TextBoxes：

Private Sub Command1_Click(Index As Integer)

   Text1(Index).Text = Timer

End Sub

我知道这不是很有用的代码，但是它演示了可以在VB6中轻松使用控件数组的代码。 Cor VB.NET中最简单的等效项是什么？

解决方案

回答

制作一系列控件。

TextBox[] textboxes = new TextBox[] {
    textBox1,
    textBox2,
    textBox3
};

回答

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

回答

VisualBasic .NET的兼容性库包含强类型控制数组。这就是升级向导用来替换当前VB6控制阵列的内容。

但是，VB6中的控件数组只是对象的集合，而VB6在表面上做了一些语法魔术。在.NET世界中，通过删除此选项，他们正在强制采取更好的做法。

最后，随着泛型的出现，没有什么可以阻止我们使用

List<YourControl> MyControlArray.

回答

有两个方面。

.NET很容易支持控件数组，VB6只能使用一种解决方法，因为否则，连接事件真的很困难。在.NET中，动态连接事件很容易。

但是，.NET表单设计器不支持控件数组的原因很简单：控件数组是在运行时创建/扩展的。如果知道在编译时需要多少个控件(推理就可以了)，那么可以给它们指定不同的名称，而不必将它们放在数组中。

I know it's not very useful code

这就是重点。如果没有用，为什么还要有功能？

如果需要，我们还可以按名称访问控件，结果如下所示：

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

回答

列出文本框的一般列表：

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;
}

回答

相同的单击事件可以处理.Net中多个按钮的按下事件。然后，我们可以添加文本框以在Tag属性中查找？

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

回答

.Net中没有真正的一对一模拟。当然，我们可以创建特定类型的控件的数组或者列表，但是没有什么可以自动为我们完成此操作。

但是，我从未见过无法在.Net中重构为更好的控件数组。一个很好的例子就是你的例子。在我们发布的方案中，我们正在使用控件数组将按钮与文本框配对。在.Net中，我们可能会使用自定义控件来执行此操作。自定义控件将包含一个按钮，一个文本框，以及一个共享/静态计时器。该窗体使用此自定义控件的多个实例。我们只需实施一次控件所需的逻辑，即可将其隔离到自己的源文件中，而无需与较大的表单类合并即可在源代码控件中对其进行跟踪和编辑，或者可以轻松地在多个表单甚至多个项目中重复使用。我们也不必担心确保命令按钮索引与文本框索引匹配。

为此，使用自定义控件而不是控件数组与使用类对数据而不是数组进行分组大致相似，因为我们将获得名称而不是索引。

回答

VB6中控制数组的两个主要优点是：
(1)它们为我们提供了一种遍历控件集合的方式
(2)他们允许我们在控件之间共享事件

(1)可以使用一系列控件在.Net中完成
(2)可以通过让一个事件处理多个控件来实现(语法略有不同，因为我们使用的是sender参数而不是myArray(index)。)

.Net的一件好事是这些功能是分离的。因此，例如，我们可以具有共享事件的控件，即使它们不是数组的一部分，并且具有不同的名称，甚至具有不同的类型。而且，即使它们具有完全不同的事件，也可以遍历一组控件。