... Array.Sort(A) ' 排序 '===== For i = 1 To n TextBox2.Text &= Space(8 - 2 * Len(Str(A(i)))) & Str(A(i)) ...
tw.myblog.yahoo.com