Question

我刚刚阅读了一篇关于VB6控件数组的文章，这篇文章并没有出现在VB.NET中，而是成为了一个＆＃34;集合＆＃34;什么......（http://visualbasic.about.com/od/usingvbnet/l/bldykctrlarraya.htm）

现在，我正计划学习VB.NET并接受它作为全新的语言。

所以，作为一个＆＃34;几个步骤＆＃34;对我来说，这是我的VB6代码：

Private Sub Command1_Click()
    For i = 0 to 9
        Command2(i).Caption = i
    Next i
End Sub

Private Sub Command2_Click(Index as Integer)
    Label1.Caption = Label1.Caption + Index
End Sub

我想知道你的节目是否合适？我们只是说它是一个特定的数字填充程序。我将解释这个程序的作用，至少现在......

正如你所看到的，我有12个...控件？（对不起，我在编程方面还有点新意）......是的，其中12个...... 11个按钮和1个标签。那1个按钮，Command1，将给出我的其他10个按钮Command2（索引）的标题。当按下Command2（索引）时，Label1的当前标题将被Command2（索引）索引连接......（它就像一个计算器，让我们跳过这个现在）

那么，您会在VB.NET中教我这个版本/翻译吗？ :)谢谢！

Answer 1

只需在表单Button1 - Button12

上添加12个常规按钮即可

然后创建一个列表来保存对这些的引用：

Private _buttonList As New List(Of Button)

将您的按钮添加到Form_Load上的列表：

Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
    _buttonList.Add(Button1)
    _buttonList.Add(Button2)
    _buttonList.Add(Button3)
    'etc.
End Sub

然后您可以使用列表通过（从零开始）索引访问您的按钮：

    _buttonList(4).Text = "foo"

你能帮我从VB 6.0迁移到VB.NET吗？

1 个答案: