منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

نسخة كاملة : طلب كود
أنت حالياً تتصفح نسخة خفيفة من المنتدى . مشاهدة نسخة كاملة مع جميع الأشكال الجمالية .
الصفحات : 1 2
(28-06-16, 04:59 AM)bidaya كتب : [ -> ]اخي انا ابحث عن البديل

طيب اخي الكريم اليوتيوب مليء بالشروح لكيفية عمل متصفح انترنت بسيط ابحث باللغة الانجليزية make advanced webbrowser
ولا تحتاج تفهم الشرح (اقصد اللغة الانجليزية فقط انظر للخطوات وطبقها)
شكرا اخي الكريم سعود
صدقني قد اهدرت من الوقت الكثير في البحث لم اجد هته الطريقة
يا بدايا،

حاولت أحمل المرفق من المنتدى
http://vb4arb.com/vb/attachment.php?aid=10954
هذه الرسالة تظهر لي (المرفق الذي حددته غير موجود .)

وبعدين طلع موضوعك مختلف تماماً..
اخي الكريم الوادي لم افهم اين الاختلاف

(28-06-16, 05:45 AM)bidaya كتب : [ -> ]اخي الكريم  الوادي لم افهم اين الاختلاف

اول سؤال قلت اريد ربط شريط التقدم بالحدث وقلت وكمثال تحميل ملف .........الخ
(28-06-16, 06:01 AM)الكاتب كتب : [ -> ]الاخوة الكرام ارجو تحميل المثال وتجريبه
الاخ بدايه ما المشكله لديك هل تريد تحميل ملف او استخدام ويب براوزر ؟

اخي  الكاتب   اولا اعذرن على الازعاج  كما اني اشكرك اخ  على مساعدتك لي
اما عن مذا اريد   اريد  شريط التقدم  يتقدم مع نسبة العرض لادات الويب براوزر  ( اي يعرض نسبة التحميل ) مثل برنامج التحميل
اريد تطبيق الطريقة على المثال المرفق

                  سامحوني اخواني ان كنت قد بالغت في طرح الأسئلة
اخي الكريم ظنيتك عرفت الطريق من خلال ردك لي
يوجد حدث بالويب براوزر
https://www.youtube.com/watch?v=pgoLmxTyxek
انظر للشرح وهو فقط لجزئية الـ شريط التقدم
ملاحظة(لا تشغل السماعات لوجود موسيقى)
السلام عليكم
ان كنت تقصد شريط التحميل اسفل الصفحة و الذي يدل على اكتمال تحميل الصفحة
يتوجب عليك استخدام الحدث WebBrowser1_ProgressChanged
و من ثم باضافة StatusStrip الى واجهة النموذج لديك و اضف بداخله ToolStripProgressBar1
و استخدم الكود التالي
PHP كود :
   Private Sub WebBrowser1_ProgressChanged(sender As ObjectAs System.Windows.Forms.WebBrowserProgressChangedEventArgsHandles WebBrowser1.ProgressChanged
        Try
            Dim CurProg 
As Double

            Dim MaxProg 
As Double

            CurProg 
e.CurrentProgress

            MaxProg 
e.MaximumProgress

            ToolStripProgressBar1
.Value = (CurProg MaxProg) * 100

        Catch ex 
As Exception
            
'
        End Try

    End Sub 
يا الكاتب،

إذا كنت تقصد مثال IDM فقد جربته ويعمل بشكل صحيح وشغله مرتب، وما ردي المرفق بصورة الخطأ إلا حركة لفت نظر Tongue
الكاتب
الوادي
سعود
ابو ليلى
شكرا لكم على هذه المساعدة القيمة
رمضانكم كريم
الصفحات : 1 2