Question

vb编程用二维数组输出一下图形 * *** *****

求教求教 急用 啊 ！！

Answer 1

是这个吧？
*
***
*****

Dim a(2, 4) As String, i, j As Integer
Label1.Text = ""
For i = 0 To 2
For j = 0 To 4
If i * 2 >= j Then
a(i, j) = "*"
Else : a(i, j) = " "
End If
Label1.Text &= a(i, j)
Next
Label1.Text &= vbCrLf
Next

Answer 2

是***
**
***
323

Answer 3

我不知道