report printing in landscap

I am using vb6's report and I want to set the report property landscap in printing.any one can help me out.

Take a look at this...

Moved to Reporting section.

I have also some exp on this one... and I dont know if you like my solution.
VB Data Report Right?
Try to Search for PageSet.DLL, download it and install in your computer using regsvr32.exe, and try to add it on your reference in you project the -> PageSet

Then you can use this code (you can add this code in you module)

VB Code:

Sub SetPrinterOrientation(tnOrientation As Integer)
 
Set gObjPrinter = New PageSet.PrinterControl
 
    Select Case tnOrientation
        Case vbPRORPortrait
            gObjPrinter.ChngOrientationPortrait
        Case vbPRORLandscape
            gObjPrinter.ChngOrientationLandscape
    End Select
End Sub

before calling the report, you need to set Printer Orientation

VB Code:

Private Sub cmdPreview_Click()
    SetPrinterOrientation (vbPRORLandscape)  
    '2 values available w/c i think constant in vb vbPRORPortrait & vbPRORLandscape
    rptInventoryStatus.Show
End Sub

;)

It really worked !!!