تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[سؤال] عند سؤال كيفية عمل امر طباعة للفروف النشاط.
#1
Heart 
السلام عليكم ورحمة الله وبركاته
عندي سؤال بسيط و هو
عندي فروم اساسي من نواع و جوها زرار طباعة و بيظهر جوها اكتر من فروم بتعرض بيانات من قاعدة البيانات في شكل جراد فيور
عايز اعمل امر طبعا للبيانات دي بشرط ان يجيب البيانات من الفروم االنشاط و شكرا جزيلا لكم
قال تعالى : يَامَعْشَرَ الْجِنِّ وَالإِنسِ إِنْ اسْتَطَعْتُمْ أَنْ تَنفُذُوا مِنْ أَقْطَارِ السَّمَاوَاتِ وَالأَرْضِ فَانفُذُوا لا تَنفُذُونَ إِلاّ بِسُلْطَانٍ
الرد }}}
تم الشكر بواسطة:
#2
load form 1
form1.show
الرد }}}
تم الشكر بواسطة:
#3
(21-12-15, 04:46 PM)احمداحمداحمد6 كتب : load form 1
form1.show

برجاء التوضيح اكتر

انا لي عايزة مثلا عند ٤ فروم مفتوحين قدمي عايز اول ما ادوس عالزار طبعا لي موجود في الفرومم الاساسي يتم طباعة الفروم النشاط من ال ٤لي ظهراين قدامي و شكرا
قال تعالى : يَامَعْشَرَ الْجِنِّ وَالإِنسِ إِنْ اسْتَطَعْتُمْ أَنْ تَنفُذُوا مِنْ أَقْطَارِ السَّمَاوَاتِ وَالأَرْضِ فَانفُذُوا لا تَنفُذُونَ إِلاّ بِسُلْطَانٍ
الرد }}}
تم الشكر بواسطة:
#4
من الممكن ان تستخدم دالة مثل الموجودة في الكود التالي لتحصل علي جميع الفورم المفتوحة
ثم تتأكد ان الفورم Active أو Selected و بناء عليه تقوم بطباعته كيفما شئت

كود :
Friend Function GetForm(formName As String) As Form

       If Application.OpenForms.Count = 0 Then
           Return CType(Nothing, Form)
       End If

       For i As Integer = 0 To Application.OpenForms.Count - 1
           Dim currentForm As Form = Application.OpenForms(i)
           If currentForm IsNot Nothing AndAlso Not currentForm.IsDisposed AndAlso currentForm.IsHandleCreated Then
               If currentForm.Name = formName Then
                   Return currentForm
               End If
           End If
       Next

       Return CType(Nothing, Form)
   End Function

عليك أن تضع في اعتبارك أن إسم الفورم الذي سوف تمرره للدالة Case-Sensitive أي أنك يجب أن تمرر الاسم بكل دقة

مثلا للحصول علي الفورم رقم 1


PHP كود :
Dim currentform As Form CType(GetForm("Form1"), Form

وطالما حصلت علي الفورم أصبح كل شئ سهلا بعد ذلك
الرد }}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  سؤال عن توافق الكريستال ريبورت مصمم هاوي 2 118 09-05-26, 01:23 AM
آخر رد: مصمم هاوي
  [VB.NET] سؤال بخصوص الترقيم التلقائي اليدوي yosif 5 568 16-04-26, 01:05 AM
آخر رد: أبو خالد الشكري
  [VB.NET] كيفية عمل جدولين في نفس التقرير مختار الوافي 3 489 05-04-26, 02:51 PM
آخر رد: مصمم هاوي
  [سؤال] كيفية عمل ارشيف للملفات المحفوظة عاصم النجار 5 2,393 25-02-26, 04:04 AM
آخر رد: السودي
  سؤال عن الاسمبلي و النيم سبيس justforit 0 258 07-12-25, 12:28 AM
آخر رد: justforit
  فائدة بخصوص التعامل مع علامات التنصيص مع {سؤال} justforit 4 562 02-11-25, 11:19 PM
آخر رد: justforit
  كيفية منع ظهور الأخطاء من إعدادات البيسيك mmaalmesry 2 1,049 29-08-25, 10:30 AM
آخر رد: mmaalmesry
  كيفية جلب أسماء الأعمدة بجدول من جداول sql heem1986 2 952 17-08-25, 09:15 PM
آخر رد: heem1986
  كيفية حفظ إعدادات البرنامج بحيث لا تتغير أحمد إبراهيم سعد 4 3,335 06-08-25, 06:34 PM
آخر رد: Taha Okla
  مساعدة في كيفية ترحيل البيانات من داتا قريدفيو إلى داتا قريدفيو في فيجوال بيسك ahmedfa71 13 2,823 09-07-25, 11:24 PM
آخر رد: أبو خالد الشكري

التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم