[tomjerry741]

والان قبل العمل فعليا فى برمجة وكتابة الاكواد
عليك ملاحظة ان ميكروسوفت ويب بروزر اسمة فى خاصية name
AxWebBrowser1 فلا تقوم بتغيير الاسم

ولا وجود للخاصية text لهذا العنصر ...
عليك بأضافة تايمر جديد الى الفورم وستجد انه اتخذ مكانة بالاسفل مع منيو ستريب ومع ستيتيوس ستريب

قم بالضغط مرتين على الزر الاول والذى اسميناه Go
واكتب الكود الاتى

AxWebBrowser1.Navigate(ComboBox1.Text)

Timer1.Start()
If ToolStripProgressBar1.Value = 100 Then
Timer1.Enabled = False
End If
End Sub

-
برمجة العنصر تايمر
قم بالضغط على الزر تايمر مرتين وفى منطقة الكود اكتب الامر الاتى

ToolStripProgressBar1.Increment(1)

If ToolStripProgressBar1.Value = 100 Then
ToolStripStatusLabel1.Text = " Welcome"
Timer1.Enabled = False
End If

---
والان الى برمجة الزر الثانى
نقوم بالضغط مرتين على الزر الثانى والذى اسميناه Back
وفى منطقة الكود نقوم بكتابة الامر الاتى

AxWebBrowser1.GoBack()

----

والان نعود مرة اخرى الى الفورم ونضغط مرتين على الزر الثالث والذى اسميناة Forward
ونقوم بكتابة الامر الاتى

AxWebBrowser1.GoForward()

-------------------------------------------
والان نعود مرة اخرى الى الفورم ونضغط مرتين على الزر الرابع والذى اسميناة ******* رفريش *******
ونقوم بكتابة الامر الاتى بدل النجوم دى اكتب رفريش بالانجليزية
axwebBrowser1.*******()
AxWebBrowser1.*******()

AxWebBrowser1.******* ()

-------------
والان نعود مرة اخرى الى الفورم ونضغط مرتين على الزر الخامس والذى اسميناة Stop
ونقوم بكتابة الامر الاتى

AxWebBrowser1.Stop()

----------

واليكم النتيجة النهائية لترتيب الاكواد
اضغط على الشريط الاصفر اعلى الصورة للوضوح

انتهينا من الجزء الاول الخاص بدرس اليوم
ونقوم باستكمال الجزء الثانى غداً بأذن الله

والان لتجربة مشروعك قم بالضغط على زر اف5 من لوحة المفاتيح
او قم بحفظة من خلال الضغط على قائمة file فى برنامج الفجيوال بايسك واختار save form1


هل افادك هذا المشروع بمعلومة جديدة !؟؟!!