0

我在创建一个 Visual Basic 应用程序时使用了 15 个文本框。文本框的名称从“TB1”到“TB15”。我现在想将该值复制到名为“a”的二维数组中。我该怎么做请帮助下面的代码

For i = 0 To 4 Step 1     
  For j = 0 To 2 Step 1
    a(i, j) = Convert.ToInt32(TB1.Text)    
  Next
Next

我应该如何修改线路a(i, j) = Convert.ToInt32(TB1.Text)

4

1 回答 1

1

默认情况下,步长始终为 +1,因此不需要。您可以通过调用 Controls() 按名称访问控件,并且可以完全访问该对象。

    Dim Counter As Long = 0
    For i = 0 To 4
        For j = 0 To 2
            Counter += 1
            a(i, j) = Convert.ToInt32(Controls("TB" & Counter.ToString).Text)
        Next
    Next
于 2012-05-09T19:06:04.003 回答