無法輸出數組

Question

我被要求在一個標簽中輸出兩個數組，我的代碼如下：

Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click    
  If block = True And counter <= 23 Then
    Try
      array1(counter) = TextBox1.Text
      Dim txtbox2 As String = CInt(TextBox2.Text)
      array2(counter) = txtbox2
      counter += 1
    Catch ex As Exception
      TextBox2.Text = ""
    End Try
End Sub

Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click
  Dim arr1 As String
  Dim arr2 As String
  Dim result As String
  For Each values In array1
    arr1 = values
  Next

  For Each values In array2
    arr2 = values.ToString
  Next
  Label3.Text = String.Join("     ", arr1, arr2)
End Sub

當我單擊按鈕時，它不會顯示數組的所有值，而是僅顯示每個數組的第一個。 我也試圖以標簽形式的表格視圖顯示它。

Answer 1

您可能應該使用List(Of String)而不是數組，但話雖這么說，您的String.Join試圖合並兩個數組，但它並非完全如此。

嘗試將字符串添加到List(Of String) ，然后將整個輸出轉換回單個數組：

Dim results As New List(Of String)(array1)
results.AddRange(array2)
Label3.Text = String.Join(" ", results.ToArray)

如果第二個數組是整數數組，則必須將它們轉換為字符串數組：

Dim results As New List(Of String)(array1)
results.AddRange(array2.Select(Function(x) x.ToString))
Label3.Text = String.Join(" ", results.ToArray)