• Home
 · 
• Miscellaneous
 · 
• landscape orientation for datareport.

landscape orientation for datareport.

landscape orientation for datareport.

API Declarations



http://download.microsoft.com/download/vb60pro/Utility/1/WIN98/EN-US/Pageset.exe
you have to refer the pageset.dll first
add a class module - found in the file.



Rate landscape orientation for datareport.

• 1
• 2
• 3
• 4
• 5

(1(1 Vote))

Dim obj As PageSet.PrinterControl

Private Sub Command1_Click()
On Error GoTo errorhandler:
Set obj = New PageSet.PrinterControl
obj.ChngOrientationLandscape
dateport1.Show
dateport1.PrintReport False, rptRangeFromTo, 1, 1

Exit Sub

errorhandler:
 MsgBox Err.Description
 obj.ReSetOrientation

End Sub


Private Sub Form_Unload(Cancel As Integer)

obj.ReSetOrientation 'This resets the printer to portrait.

End Sub

'note.Given the pageset dll reference for the project