کیفیت پایین در Picturebox در چاپ

با سلام
من یه سری اطلاعات رو روی یه Picturebox نشون می دم و زمانی که می خوام اون رو چاپ کنم با کیفیت خیلی پایینی پرینت میشه - آیا راهی هست که بهتر بشه یا روش دیگه ای هم هست ! ممنون می شم ( البته بگم این اطلاعات روی Picturebox به صورت عکس قرار میگیره و احتمالا هم علت کم بودن کیفیت همینه ) از Printquality هم استفاده کردم نشد
این رو هم برای پرینت استفاده می کنم

Printer.KillDoc

Printer.ScaleMode = vbpixel

For i = 0 To PageI

Printer.PaintPicture Page(i).Image, 1, 1

Printer.NewPage

Next

Printer.PrintQuality = 1200

Printer.EndDoc