Question

vb一个包含10个数组元素的数组a,该数组分别赋值2.4.6.8........20输出

Answer 1

 Private Sub Button7_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button7.Click
        Dim st As String = ""
        Dim a(10) As Integer
        For i = 1 To 10
            a(i) = 2 * i
        Next
        For i = 1 To 10
            st = st & a(i) & " "
        Next
        TextBox6.Text = st.ToString
    End Sub