منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب
فتح فورم عن طريق ProgressBar - نسخة قابلة للطباعة

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183)
+--- الموضوع : فتح فورم عن طريق ProgressBar (/showthread.php?tid=26112)

الصفحات: 1 2

فتح فورم عن طريق ProgressBar - كريم جودي - 14-08-18

السلام عليكم اردت مساعدتكم في ان افتح فورم عن طريق ProgressBar وذلك عن طريق تطبيق احد الفيديوهات من اليوتوب
وهو متعلق بقاعدة البيانات  ولكن انا لم اعرف كيفية فتح الفورم بعد الوصول الى النسبة 100/100
وكذلك الحساب من 0 الى 100
الملف في المرفقات

RE: فتح فورم عن طريق ProgressBar - elgokr - 14-08-18

عفواً اخى الحبيب
لا يوجد اى مرفقات

وفقت لاتمام فتح الفورم الثاني كل ما عليك استخدام هذا الكود
كود :
       Form2.Show()
       Me.Close()

فقط استخدم الكود بعد التحقق من اكتمال النسبة لـ 100/100
مع تغير كلمة Form2 الى اسم الفورم المطلوب فتحه

وتذكر ان تقوم بالتعديل على التالى لتصبح القيمة كما يلى
My Project > Application >> Shutdown mode: [When last form closes]

حتي لا يقلق البرنامج عند اغلاق شاشة الافتتاحية

تحياتى لك
وتمنياتى لك التوفيق


RE: فتح فورم عن طريق ProgressBar - كريم جودي - 14-08-18

شكرا اخي [b]elgokr على الرد لقد ارفقت الملف لو تلقي نظرة عليه[/b]

RE: فتح فورم عن طريق ProgressBar - elgokr - 14-08-18

مرفق السورس + البرنامج
بعد اتمام التعديل الكود وتعديل شكل الفورم

تحياتى لك
وتمنياتى لك التوفيق


RE: فتح فورم عن طريق ProgressBar - كريم جودي - 14-08-18

شكرا اخي elgokr نجح معي التعديل في برنامجي 
ولكن لو تكمل الخير معي هونسبة التحميل من 0 الى100 مثل Internet Download Manager
لان عند ثقل قاعدة البيانات المستخدم ينتظر لذلك عليه ان يرى نسبة التحميل حتى يفتح الفورم

RE: فتح فورم عن طريق ProgressBar - بيسك لكل العرب - 14-08-18

اخي اضف هذا الكود والشكر موصول للمبدع elgokr

كود :
       ProgressBar1.Increment(1)
       Label2.Text = ProgressBar1.Value & "%"


RE: فتح فورم عن طريق ProgressBar - elgokr - 14-08-18

تم اضافة النسبة المئوية

قد لا تشعر بها وقد تراها كما لو انها 100% دائماً
وذلك بسبب قلة الحمل فى التحميل وان الامر لا يستغرق ثانية واحدة

مرفق السورس + البرنامج للاختبار

الكود المستخدم
كود :
Label2.Text = (ProgressBar1.Value / ProgressBar1.Maximum) * 100 & "%"

تحياتى لك
وتمنياتى لك التوفيق


RE: فتح فورم عن طريق ProgressBar - كريم جودي - 14-08-18

شكرا لكما الاستاذين [b]elgokr و [b][b]بيسك لكل العرب[/b][/b][/b]
[b][b]لكن اخي [b][b]elgokr القاعدة لديا كبيرة ولكن النسبة تكون مباشرة 100/100 رغم انه يستغرق وقت في فتح الفورم[/b][/b][/b][/b]

RE: فتح فورم عن طريق ProgressBar - elgokr - 14-08-18

(14-08-18, 09:11 PM)كريم جودي كتب : شكرا لكما الاستاذين [b]elgokr و [b][b]بيسك لكل العرب[/b][/b][/b]
[b][b]لكن اخي [b][b]elgokr القاعدة لديا كبيرة ولكن النسبة تكون مباشرة 100/100 رغم انه يستغرق وقت في فتح الفورم[/b][/b][/b][/b]


بخصوص يستغرق وقت فى الفتح

حيث ان الناتج 100%

فهذا ينتج على وجود شئ اخر بالفورم يقوم بعمل حمل على فتح الفورم
لان حملة 100% تعنى ان تم قراءة جميع البيانات التى تم الاستعلام عليها

مع العلم ان الطريقة التى تستخدمها هو انك تقوم بعمل تحميل لعمرية قراءة ما بداخل الاستعلام
وليس على كل ما بداخل الفورم من اكواد وتحميل

ثانياً انت عامل كود استعلام فى فورم يعتبر شاشة ترحيب

فيمكنك مشاهدة هذا الفيديو يمكنك فعل ذلك دون حاجة الى اكواد استعلام او اكواد اختبار 
https://www.youtube.com/watch?v=pkoMy4m956I

المشكلة تتوقف هنا على ماذا تريد انت فعله فعلياً
هل هى ما الا شاشة ترحيب قبل فتح البرنامج

أم ماذا وتذكر ليس يعنى ان لديك قاعدة بيانات تحتوى ولو حتى على 100 بيان هذا يعنى انها كبيرة

ما يحدد ذلك هو كود المستخدم لديك لعملية زيادة عدد 
ProgressBar1.Value

فاذا وثل للعدد كاملاً فهو لا يشغل باله بما هو لديك من اكواد اخري فى الفورم
اذا تم تحميلها او لا كما ان يوجد تايمر سيقوم باغلاق الفورم

حتى اذا لم يتم استكمال قراءة الاكواد الاخري
بمجرد ان يري ان ProgressBar1.Value وصل الى الحد الاقصي له

تحياتى لك
وتمنياتى لك التوفيق


RE: فتح فورم عن طريق ProgressBar - سعود - 14-08-18

مشاركة للجميع ابدي رايي...
استخدم اكواد تصفح البيانات افضل.
وهذا مثال بسيط جدا