الصفحة الرئيسية

فجوال بيسيك

حل مشكله الطباعه المباشره في الفجوال بيسيك

لكل من يعاني بكود الطباعه المباشره في الفجوال بيسيك . اعطيكم الجواب على سؤالكم… كل يمكن عمل كود الطباعه المباشرة في الفجوال بيسيك؟؟؟

الجواب : انشاء New form و استخدام 3 ادوات 3 tools هي 1 printDialoge1 & printDocument1 & printpriviewDialog1

الخطوه b الدخول ل خاصيه decument كل اداه ومن ثم تحديد peintdecument1 من الخصائص .

الخطوه c الدخول ل كود الأداة preintdecument1 وكتابه الكود التالي : dim font1 as new font(“ARIAL”,20, font style.bold) e.graphics(textbox1.text ,fonts, brushes.black,100,100)

ومن ثم عمل button1 وكتابه الكود الخاص بالطباعه وعمل الكود التالي ضمن كود الطباعه الذي تم الاستعلام عنه . وهو :

dim rep aa new crystalreport . Rep .setdatasource(dt) . Rep.printoptions.printname=(اسم الطابعه). Rep .printToPrinter(1 , folse ,0 , 0) . Rep.close(). Rep .dipost() ثم نفذ المشروع بإذن الله يشتغل طبيعي .