I am having a problem getting Printer.RightToLeft to work. The part of my form that does this is:

Printer.RightToLeft = True
Printer.FontBold = False

' *** PRINT THE COLUMN TEXT ***
y = 0.5 - 0.2085
For i = 1 To 36
y = y + 0.2083
Printer.CurrentX = 3.15
Printer.CurrentY = y
Select Case i
Case 11, 13, 14, 15, 18, 19, 23, 24, 26, 27, 29, 30, 31, 33, 34
Printer.FontSize = 8
Printer.CurrentY = y + 0.025
Case Else
Printer.FontSize = 10
End Select
Printer.Print ColumnText(i)
Next i

When I run the program the text is printed at the correct starting point but the printing is left-to-right.

I am using XP and VB6.0

Last year I wrote a similar form and the righttoleft worked then but I can't (a) remember how I did it or (b) find the old program.

You help is appreciated