+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183)
+--- الموضوع : طباعة صوره (/showthread.php?tid=7262)
طباعة صوره - Mido9 - 06-12-12
السلام عليكم ورحمة الله وبركاتة
اخواني الافاضل الان انا لدي صوره مصممه سابقا بنفس حجم ورقة الـ a4 و اريد طباعة الصوره
الصوره موجوده داخل picturebox1 ياريت طريقة طباعتها و جزاكم الله خيرا
طباعة صوره - Osama_Ghareeb - 06-12-12
وعليكم السلام ورحمة الله وبركاته
كود :
Dim Print As New Printing.PrintDocument
AddHandler Print.PrintPage, Sub(obj As Object, ev As Printing.PrintPageEventArgs)
ev.Graphics.DrawImage([color=#ff0000]PictureBox1[/color].Image, 0, 0)
End Sub
[COLOR=#0000cd]For Each Printer In Printing.PrinterSettings.InstalledPrinters
If MsgBox(Printer, MsgBoxStyle.YesNo) = MsgBoxResult.Yes Then
Print.PrinterSettings.PrinterName = Printer
Exit For
End If
Next
[/COLOR] Print.Print()المحدد بالأزرق يظهر للمستخدم أسماء الطابعات وإذا اختار Yes في أي من الطابعات سوف يطبع الصفحة من خلالها وإذا لم يختر شيئ سيتم الطباعة بالطابعة الإفتراضية
طباعة صوره - tecno2012 - 06-12-12
اذا كان لدي صفحة اكسل واريد ان اطبعها تكون على صفحة واحدة ولكن احيانا يتم تكبير احد الاعمدة تلقائيا وتاتي على اكثر من صفحة هل من طريقة لكي ابقي على نفس التصميم ف صفحة واحدة