تقييم الموضوع :
  • 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

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


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  سؤال عن الاسمبلي و النيم سبيس justforit 0 99 07-12-25, 12:28 AM
آخر رد: justforit
  فائدة بخصوص التعامل مع علامات التنصيص مع {سؤال} justforit 4 264 02-11-25, 11:19 PM
آخر رد: justforit
  كيفية منع ظهور الأخطاء من إعدادات البيسيك mmaalmesry 2 845 29-08-25, 10:30 AM
آخر رد: mmaalmesry
  كيفية جلب أسماء الأعمدة بجدول من جداول sql heem1986 2 744 17-08-25, 09:15 PM
آخر رد: heem1986
  كيفية حفظ إعدادات البرنامج بحيث لا تتغير أحمد إبراهيم سعد 4 2,994 06-08-25, 06:34 PM
آخر رد: Taha Okla
  مساعدة في كيفية ترحيل البيانات من داتا قريدفيو إلى داتا قريدفيو في فيجوال بيسك ahmedfa71 13 2,212 09-07-25, 11:24 PM
آخر رد: أبو خالد الشكري
  [نقاش] سؤال MetoDas 2 1,485 20-04-25, 10:21 PM
آخر رد: Kamil
  [سؤال] سؤال ترددت قبل نشرة:طابعة الباركود لماذا تطبع أكثر من ليبل فارغ قبل السليم dr.programming 1 506 20-04-25, 09:26 PM
آخر رد: Kamil
  [سؤال] اريد طباعة تقرير ريبورت فيو مباشرة فور عرض التقرير mh66 1 555 22-03-25, 09:59 AM
آخر رد: mh66
  طريقة طباعة ملف pdf بقاعدة بيانات sql heem1986 0 517 25-02-25, 09:31 AM
آخر رد: heem1986

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


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