Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click PrintDocument1.Print() End Sub
Private Sub PrintDocument1_PrintPage(sender As Object, e As PrintPageEventArgs) _ Handles PrintDocument1.PrintPage Dim newImage As Image = Image.FromFile("c:\logo.png") e.Graphics.DrawImage(newImage, 50, 50, 100, 80) End Sub
(11-09-22, 12:36 PM)alfaiz678 كتب : [ -> ]ماشاء الله تبارك الله
جربتها طيبة
لدي استفسارات حولها
هل استطيع تغيير العنوان بالكود PrintTitle
والتصدير الى pdf يولد مشكلة