VB怎么让显示的结果排在一列

Question

b 2
ban 1
c 3
ch 1
chu 1
chua 1
co 2
con 1
怎么让显示的结果就是后面的数字都显示在一列啊
b     2
ban   1
c     3
ch    1
chu   1
chua  1
co    2
con   1
弄成这个样子的改怎么弄啊

Answer 1

'Text1设成多行显示
Private Sub Form_Load()
ARR = Array("b 2", "ban 1", "c 3", "ch 1", "chu 1", "chua 1", "co 2", "con 1")For i = 0 To UBound(ARR)
Dim a As String * 6
a = Left(ARR(i), Len(ARR(i)) - 1)
b = Right(ARR(i), 1)
c = a & b
S = S & c & vbCrLf
Next
Text1.Text = S
End Sub