print a table

[sohjai]

Hi everyone, I am new in VB and I would like to know how to print a 4*3 table using the printer object?

 

[bjd4jc]

Dim LCV1 As Integer
Dim LCV2 As Integer
Dim MyArray(1 To 4, 1 To 3) As Long
Dim PrintLine As String

'Load The array
For LCV1 = 1 To 4 Step 1
   For LCV2 = 1 To 3 Step 1
      MyArray(LCV1, LCV2) = LCV1 * LCV2
   Next
Next

PrintLine = ""
For LCV1 = 1 To 4 Step 1
   For LCV2 = 1 To 3 Step 1
      PrintLine = PrintLine & MyArray(LCV1, LCV2) & Space(5)
   Next
   Printer.Print PrintLine
   PrintLine = ""
Next
Printer.EndDoc

This is very generic... I hope it is what you're looking for!

Brian

 

[sohjai]

Actually I want to print the border of the table(using the printer object to draw the table), so how can I do that?