并不复杂的输出问题，请帮忙，高分相送！

Question

在编写一个vb的应用程序，遇到如下问题。
两个数组变量，a（），b（），分别有自己的值，想打印它们的值，要求分两列，一列打印a（），一列打印b（），并且每一列都是左对齐的。
该如何实现呢？盼望高手解答，本人较菜，请说的具体些。谢谢！
得到满意答案就结贴！

Answer 1

是这意思？Private Sub Command1_Click()    Dim a(2) As String, b(2) As String, i As Long
    a(0) = "a0": a(1) = "a1": a(2) = "a2"
    b(0) = "b0": b(1) = "b1": b(2) = "b2"
    
    For i = 0 To UBound(a)
        Debug.Print a(i); vbTab; b(i)
    Next i
    
End Sub

Answer 2

打印的时候如果怕字符对不齐，把中间间隔的空格改成vbTab字符

Answer 3

补充：第一，是想用打印机输出，不是在显示器上输出。
      第二，由于两个数组分别属于两个form，不知道怎么才能在其中一个form中通过“点击打印按钮”输出这两个分属不同窗体的数组到一张纸上。

Answer 4

Private Sub Command1_Click()
    Dim a()  As Variant, b() As Variant
    
    a = Array("1", "2", "3")
    b = Array("4", "5", "6")
    printValue a, b, Form1
End SubPublic Sub printValue(a As Variant, b As Variant, prtObj As Object)
    Dim i As Long
    
    For i = 0 To UBound(a)
        prtObj.Print a(i) & vbTab & b(i)
    Next
    
    If prtObj Is Printer Then
        Printer.EndDoc
    End If
End Sub