كيف تصنع متصفح انترنت بالفجيوال بيسك-- والشرح بالصور

من طرف Admin الجمعة 7 ديسمبر 2012 - 0:58

بسم الله الرحمن الرحيم
اللهم لا سهل الا ما جعلته سعلا وانت تجعل الحزن ان شئت سهلا
اعذرونى يااخوانى
فى هذا الموضوع الذى اقدمه لكم على عجالة ---
الشرح الان بالصور فقط ولكن بعد ساعتين سوف اشرح لكم الخطوات كاملة باذن الله
تابع الصور كما هى مرقمة
1-
[ندعوك للتسجيل في المنتدى أو التعريف بنفسك لمعاينة هذه الصورة]

2-
[ندعوك للتسجيل في المنتدى أو التعريف بنفسك لمعاينة هذه الصورة]

3-
[ندعوك للتسجيل في المنتدى أو التعريف بنفسك لمعاينة هذه الصورة]
4
[ندعوك للتسجيل في المنتدى أو التعريف بنفسك لمعاينة هذه الصورة]
5
[ندعوك للتسجيل في المنتدى أو التعريف بنفسك لمعاينة هذه الصورة]
6
[ندعوك للتسجيل في المنتدى أو التعريف بنفسك لمعاينة هذه الصورة]
7
[ندعوك للتسجيل في المنتدى أو التعريف بنفسك لمعاينة هذه الصورة]
8
[ندعوك للتسجيل في المنتدى أو التعريف بنفسك لمعاينة هذه الصورة]
9
[ندعوك للتسجيل في المنتدى أو التعريف بنفسك لمعاينة هذه الصورة]

10-
[ندعوك للتسجيل في المنتدى أو التعريف بنفسك لمعاينة هذه الصورة]

11
[ندعوك للتسجيل في المنتدى أو التعريف بنفسك لمعاينة هذه الصورة]

12
[ندعوك للتسجيل في المنتدى أو التعريف بنفسك لمعاينة هذه الصورة]

13
[ندعوك للتسجيل في المنتدى أو التعريف بنفسك لمعاينة هذه الصورة]

14
[ندعوك للتسجيل في المنتدى أو التعريف بنفسك لمعاينة هذه الصورة]
15

[ندعوك للتسجيل في المنتدى أو التعريف بنفسك لمعاينة هذه الصورة]

16
[ندعوك للتسجيل في المنتدى أو التعريف بنفسك لمعاينة هذه الصورة]

اخيرا
نقوم بتجربة مشروعنا الجديد كالاتى
نضغط زر start debuging وهو عبارة عن زر اخضطر مثل السهم موجود اعلى منتصف الفجيوال بايسك لتجربة مشروعك قم بالضغط علية

---

[ندعوك للتسجيل في المنتدى أو التعريف بنفسك لمعاينة هذه الصورة]

---

[ندعوك للتسجيل في المنتدى أو التعريف بنفسك لمعاينة هذه الصورة]

اقتباس:

oriparites
form
size=980;740
autosizemode=GrowAndShrink
backcolor=SpringGreen
text=thanwya Web Browser 2012
maxmizbox=false
startposition=CenterScreen
fixedborderstyle=FixedToolWindow

اقتباس:

قم بتغيير خاصية الاسم لكل زر من الازرار التى اضفناها الى الفورم كما يلى

button 1
text= Go

button 2
text=back

button 3
text=forward

button 4
text=*******

اقتباس:

بالنسبة لبرمجة كل زر من الازرار الاربعة ستكون الاتى
اضغط على كل زر على حدة وقم بنسخ الكود الذى يخصة
--------------------
code button 1
WebBrowser1.Navigate(TextBox1.Text)
-------------------------------
code button 2
WebBrowser1.GoBack()
--------------------------------
code button 3
WebBrowser1.GoForward()
-----------------------------------
code button 4
WebBrowser1.*******()

طب اقول اية تانى
لو مش فاهم اى حاجة خالص
انت اعمل الفورم
[ندعوك للتسجيل في المنتدى أو التعريف بنفسك لمعاينة هذه الصورة]
وركب فيه الادوات المطلوبة من صندوق الادوات
وقم بالضغط اعلى الفورم مرتين وانسخ الكود التالى كاملا
قم بنسخ الكود التالى ما بين
public class form1 وبين End class فى اخر السطر

اقتباس:

Public Class Form1
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
WebBrowser1.Navigate(TextBox1.Text)
Timer1.Start()
End Sub
Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
WebBrowser1.GoBack()
End Sub
Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click
WebBrowser1.GoForward()
End Sub
Private Sub Button4_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button4.Click
WebBrowser1.*******()
End Sub
Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
ProgressBar1.Increment(3)
End Sub
Private Sub ProgressBar1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ProgressBar1.Click
ProgressBar1.Value = (10)
If ProgressBar1.Value = 100 Then
ProgressBar1.Value = 0
Timer1.Stop()
End If
End Sub
Private Sub Form1_Enter(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Enter
WebBrowser1.Navigate(TextBox1.Text)
WebBrowser1.GoSearch()
End Sub
Private Sub TextBox1_Enter(ByVal sender As Object, ByVal e As System.EventArgs) Handles TextBox1.Enter
WebBrowser1.Navigate("[ندعوك للتسجيل في المنتدى أو التعريف بنفسك لمعاينة هذا الرابط]
End Sub
End Class

كما بالصورة الاخيرة الاتية
[ندعوك للتسجيل في المنتدى أو التعريف بنفسك لمعاينة هذه الصورة]
ويمكنك ايضا واخيرا تحميل مشروعى كاملا بالصور السابقة بالاكواد
بخصائص الفورم والادوات من هذا الرابط التالى
Click Here ادعس هنا
حجم الملف لا يتجاوز ميجا ونصف فقم بتحميلة وتسطيب البرنامج فقد ارفقت ملف سيت اب معة ...
وللموضوع بقية بأذن الله
سنتعلم كيف تضيف اكثر حيوية وقيمة الى هذا المشروع فى الدرس التانى هنا اسفل هذا الموضوع باذن الله
سنتعلم كيف نضع كود خاص للقص
والنسخ
واللصق
والعديد من الازرار الاخرى
قريبا جدا
----------
لا تنسونى بالدعاء لعل منكم من هو مستجاب الدعوة عند الله

lol!