PDA

View Full Version : کد پرینت گرفتن از picturebox



robojalal
دوشنبه 25 شهریور 1392, 04:07 صبح
سلام دوستان من یه picture box دارم که میخوام از روش پرینت بگیرم کدی مد نظر شما هست ؟ باید چیکار کنم ؟ تشکر

boveiryghasem
دوشنبه 25 شهریور 1392, 10:14 صبح
امیدوارم بدردت بخوره.
Friend WithEvents prntDoc As New PrintDocument()

Private Sub prntDoc_PrintPage(ByVal sender As Object, ByVal e As System.Drawing.Printing.PrintPageEventArgs) Handles prntDoc.PrintPage
e.Graphics.DrawImage(Me.PictureBox1.Image, 0, 0)
End Sub

Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click

Dim prnDialog As New PrintDialog()
prnDialog.Document = prntDoc
prntDoc.Print()
End Sub

robojalal
دوشنبه 25 شهریور 1392, 15:45 عصر
دستت درد نکنه ، جواب داد
فقط اینکه سایز عکس من بزرگ هست ، picture box ی که آوردم اندازه اشو کوچک کردم و عکس کلا داخل اون با استفاده از تنظیماتش کوچک کردم
من میخوام که عکس با همون سایز کوچک پرینت گرفته بشه . چیکار باید بکنم؟