02-06-14, 10:39 AM
الصفحات : 1 2
02-06-14, 11:56 AM
شكرا للرد
اخي الكريم المقصد كود الطباعة
فقط للعناصر المحددة
كريستال ريبورت
فيجوال بيسك 2008
اخي الكريم المقصد كود الطباعة
فقط للعناصر المحددة
كريستال ريبورت
فيجوال بيسك 2008
02-06-14, 09:15 PM
السلام عليكم
اخي العزيز لا تتوقع ابدا من الاعضاء ان يقوموا باعطائك "كود" جاهز
سأعطيك فكرة:
قم بعمل فور لوب لكل العناصر الموجود في الفورم (اقصد الكونترولز) وتأكد من الـCheckBox لكل Text فاذا كان محددا اعط قيمة الـText المحدد لمتغير ومن ثم مرر هذا المتغير الى الـCrystal
تحياتي
اخي العزيز لا تتوقع ابدا من الاعضاء ان يقوموا باعطائك "كود" جاهز
سأعطيك فكرة:
قم بعمل فور لوب لكل العناصر الموجود في الفورم (اقصد الكونترولز) وتأكد من الـCheckBox لكل Text فاذا كان محددا اعط قيمة الـText المحدد لمتغير ومن ثم مرر هذا المتغير الى الـCrystal
تحياتي
03-06-14, 09:11 AM
شكرا اخي الكريم
ولكن بصراحة لم افهم شي اذا كان هناك شرح بالصور
ولا تنسى هذا الحديث
عن أبي هريرة قال قال رسول الله : صلى الله عليه وسلم { من سئل عن علم فكتمه ألجمه الله بلجام من نار يوم القيامة } ورواه ابن ماجه والترمذي وحسنه , وصححه الألباني
ولكن بصراحة لم افهم شي اذا كان هناك شرح بالصور
ولا تنسى هذا الحديث
عن أبي هريرة قال قال رسول الله : صلى الله عليه وسلم { من سئل عن علم فكتمه ألجمه الله بلجام من نار يوم القيامة } ورواه ابن ماجه والترمذي وحسنه , وصححه الألباني
03-06-14, 09:19 AM
انا اعرف انه صعب الحصول على مساعدة مثل هذا الكود ولكن لم اجد من يساعدني سابحث وابحث عن طريق الانترنت وانشاء الله اجد من يساعدني وانا مستعد لمساعدة اي شخص شرح طريقة عمل برنامج محاسبي متكامل
لانني والحمد الله لااخفي المعلومة
لانني والحمد الله لااخفي المعلومة
03-06-14, 09:54 AM
شكرا للرد اخي الكريم انا لست صغير بالسن عمري 31
انا لااتهم الاعضاء
واعتذر اذا انزعج مني الاعضاء
وشكرا مرة ثانية
انا لااتهم الاعضاء
واعتذر اذا انزعج مني الاعضاء
وشكرا مرة ثانية
03-06-14, 10:31 AM
السلام عليكم
شكرا لك اخي يوسف على اخلاقك الطيبة وان شاء الله لن يبخل احد بالاجابة عن اي استفسار طبعا قدر الاستطاعة
يعطيك العافية
شكرا لك اخي يوسف على اخلاقك الطيبة وان شاء الله لن يبخل احد بالاجابة عن اي استفسار طبعا قدر الاستطاعة
يعطيك العافية
03-06-14, 11:20 AM
الاخ يوسف
ابشر بضل معاك الى ان تعمل النافذة وتحصل على المطلوب وتطبع المحدد ابشر
وطالما ننفذ هذا الشي مع بعض
سؤال لماذا 80 Textbox قد نختصرها بأداة اخرى اذا عرفت السبب
ابشر بضل معاك الى ان تعمل النافذة وتحصل على المطلوب وتطبع المحدد ابشر
وطالما ننفذ هذا الشي مع بعض
سؤال لماذا 80 Textbox قد نختصرها بأداة اخرى اذا عرفت السبب
03-06-14, 11:32 AM
السلام عليكم شكرا للرد اخي الكريم وبارك الله بيك وجعله الله بميزان حسناتك
لدي فورم به 80 تيكست
اي اضافة بيانات
مثلا
الاسم
العنوان
الللللللللللللللللللللللللخ
اريد طريقة معينة لطباعة العناصر التي يريدها المستخدم
مثل اعمل فورم واضع تشيك مقابل كل تيكست
والتيكست عليها تشيك يطبعها
هذه كل المسالة
وشكرا للرد مرة ثانية
وشكرا للاعضاء
لدي فورم به 80 تيكست
اي اضافة بيانات
مثلا
الاسم
العنوان
الللللللللللللللللللللللللخ
اريد طريقة معينة لطباعة العناصر التي يريدها المستخدم
مثل اعمل فورم واضع تشيك مقابل كل تيكست
والتيكست عليها تشيك يطبعها
هذه كل المسالة
وشكرا للرد مرة ثانية
وشكرا للاعضاء
03-06-14, 12:05 PM
.....
بالرغم من عدم وضوح المطلوب بالرغم مما ذكرت (لأنه يحتمل عدة اتجاهات) وبالرغم من عدم ارفاق مشروعك لتتضح الصورة
.....
بالرغم من عدم وضوح المطلوب بالرغم مما ذكرت (لأنه يحتمل عدة اتجاهات) وبالرغم من عدم ارفاق مشروعك لتتضح الصورة
كود :
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim rpt As New Report1
rpt.SetParameterValue("Name", If(Me.CheckBox1.Checked, Me.TextBox1.Text, ""))
rpt.SetParameterValue("Address", If(Me.CheckBox2.Checked, Me.TextBox2.Text, ""))
rpt.SetParameterValue("Phone", If(Me.CheckBox3.Checked, Me.TextBox3.Text, ""))
rpt.PrintToPrinter(1, True, 1, 1)
End Sub.....
الصفحات : 1 2