منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

نعم اخي حريف برمجة انا فاهم عليك
انا الي اقصدو اريد كود يقوم بالضغط على ذر البرنت

يعني انا لما حطيت الكود هذا ReportViewer1.PrintDialog
ظهرت لي خصائص الطباعة

لمن اقوم بالضغط على Enter من الكيبورد يقوم بطباعة التقرير

انا اريد كود يقوم بالضغط على Enter من الكيبورد بعد عرض خصائص الطباعة

يعني مثلا : ReportViewer1.PrintDialog.print

---

زبطت معي الأمور عندما حطيت 1 تايمر
عندما يتم فتح ال Dilog الخاص بالطباعة بقوم التايمر بالضغط على برنت

Private Sub ReportViewer2_RenderingComplete(ByVal sender As Object, ByVal e As Microsoft.Reporting.WinForms.RenderingCompleteEventArgs) Handles ReportViewer2.RenderingComplete
Timer1.Start()
ReportViewer2.PrintDialog()
End Sub


Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
My.Computer.Keyboard.SendKeys("{ENTER}", True)
Timer1.Stop()

راجع الرابط 
http://vb4arb.com/vb/showthread.php?tid=34573

(06-04-20, 01:37 PM)mohamedgadain61 كتب : [ -> ]نعم اخي حريف برمجة انا فاهم عليك
انا الي اقصدو  اريد كود يقوم بالضغط على ذر البرنت

يعني انا لما حطيت الكود هذا ReportViewer1.PrintDialog
ظهرت لي خصائص الطباعة

لمن اقوم بالضغط على Enter من الكيبورد يقوم بطباعة التقرير

انا اريد كود يقوم بالضغط على Enter من الكيبورد بعد عرض خصائص الطباعة

يعني مثلا :  ReportViewer1.PrintDialog.print

---

زبطت معي الأمور عندما حطيت 1 تايمر
عندما يتم فتح ال Dilog  الخاص بالطباعة بقوم التايمر بالضغط على برنت

Private Sub ReportViewer2_RenderingComplete(ByVal sender As Object, ByVal e As Microsoft.Reporting.WinForms.RenderingCompleteEventArgs) Handles ReportViewer2.RenderingComplete
       Timer1.Start()
       ReportViewer2.PrintDialog()
   End Sub


Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
       My.Computer.Keyboard.SendKeys("{ENTER}", True)
       Timer1.Stop()

---

من فضلك ارفق الملف الذي نجح معك