Printing problem in Visual Basic ! Urgent

venkatesh_anmca · January 28th, 2005, 01:59 AM

hi to all,
I have the printing problem in VB.

this is the code I've used
Public Sub test()
  Printer.ScaleMode = vbtwips
  Printer.PaperSize = vbPRPSUser
  Printer.Height = 4*1440
  Printer.Width = 6*1440
  printer.print "Hi"
  .
  .
  .
  .
  Printer.NewPage
  Printer.EndDoc
End Sub
my paper size is 4'' and I need to stop formfeed of the
printer after printing is over i.e., afte 4'' height
but
It get stuck in the line Printer.PaperSize=vbPRPSUser
the error says that Run-Time Error: '380' Invalid Property Value

BrianWren · January 28th, 2005, 11:59 AM

Help says

Quote:

quote:Setting a printer's Height or Width property automatically sets .PaperSize to vbPRPSUser

Perhaps you cannot set this particular value directly.

Try not setting it, set your paper size, then read the .PaperSize property to see if it is equal to vbPRPSUser.

venkatesh_anmca · January 29th, 2005, 02:22 AM

Thanks for help, but
I have another problem

I've used this code now without vbPRPUser

Public Sub test()
  Printer.ScaleMode = vbtwips
  Printer.Height = 4*1440
  Printer.Width = 6*1440
  printer.print "Hi"
  .
  .
  .
  .
  Printer.NewPage
  Printer.EndDoc
End Sub

it formfeed the entire paper

my paper size is 4''
I need to stop formfeed after printing is over i.e., after 4'' height

Thanks in advance