نحوه اضافه کردن Microsoft Internet Controls به کامپوننت ها

[m-madani]

با سلام به همه دوستان

چطوری میشه Microsoft Internet Controls رو توی لیست Component ها Add کرد ؟ من با ویژوال استدیو 2012 کار می کنم و متاسفانه این کامپوننت رو توی VB پیدا نکردم .

فقط اگه میشه یکم بصورت مبتدی راهنماییم کنید ممنون میشم . چون هنوز اول راهم .

ممنون

[مهرداد صفا]

با سلام
از منوی project گزینه add reference را باز کنید.
با کلید ctrl+tab به سربرگ COM بروید.
microsoft internet controls را انتخاب کنید و ok را بزنید.

شاه وفا ابالفضل

[m-madani]

با سلام
از منوی project گزینه add reference را باز کنید.
با کلید ctrl+tab به سربرگ COM بروید.
microsoft internet controls را انتخاب کنید و ok را بزنید.

شاه وفا ابالفضل

سلام

ممنون بایت کمکی که کردید . این کار رو کردم . با این کار این ابزار به پروژه ای که درست کردم اضافه میشه ؟ چون الان توی برنامم به دستور WebBrowser.Navigate گیر میده و این ارور رو نشون میده :

Error 1 Reference to a non-shared member requires an object reference.

[مهرداد صفا]

سلام

ممنون بایت کمکی که کردید . این کار رو کردم . با این کار این ابزار به پروژه ای که درست کردم اضافه میشه ؟ چون الان توی برنامم به دستور WebBrowser.Navigate گیر میده و این ارور رو نشون میده :

Error 1 Reference to a non-shared member requires an object reference.




سلام
خواهش میکنم. این error یعنی متودی که قصد دارید اجرا کنید shared نیست و مستقیما قابل دسترسی نیست.
ابتدا یک شی از کلاس مورد نظر بسازید و بعد متود را اجرا کنید. مثلا:

dim WebBrowser1 as new WebBrowser
WebBrowser.Navigate





شاه وفا ابالفضل

[m-madani]

بازم ممنون از لطفتون

باز این ارور رو داد : Error 1 'WebBrowser1' is already declared as 'Friend WithEvents WebBrowser1 As System.Windows.Forms.WebBrowser' in this class.

فکر کنم بهتر باشه موضوع رو کامل تر بگم .

ببینید من داشتم یک فایل آموزشی در رابطه با برنامه نويسی شبکه و اينترنت درVB رو می خوندم . همون اول یک مثال زده و گفته که :

از منوی Project مورد کامپوننت را انتخاب کنید و از لیست کنترلها Microsoft internet control را به Toolbar خود اضافه کنید . یک کنترل Web browser و یک Text box و یک دکمه روی فرم قرار دهید و سپس کد زیر را برای Event مربوط به کلیک دکمه بنویسید :

WebBrowser.Navigate textbox.text

من هم این کار رو کردم و الان برنامم به این شکله :


Public Class Form1

Dim WebBrowser1 As New WebBrowser

Private Sub Button1_Click(sender As Object, e As EventArgs)

End Sub

Private Sub TextBox1_TextChanged(sender As Object, e As EventArgs) Handles TextBox1.TextChanged

End Sub

Private Sub Button1_Click_1(sender As Object, e As EventArgs) Handles Button1.Click
WebBrowser.Navigate(TextBox1.Text)

End Sub
End Class

ولی با تغییری که به پیشنهاد شما دادم ارور گفتم رو دارم :

Error 1 'WebBrowser1' is already declared as 'Friend WithEvents WebBrowser1 As System.Windows.Forms.WebBrowser' in this class

[mohanad1993]

سلام دوست عزیز
شما اول از toolbar یک کنترل WebBrowser به فرم اضافه کنید
یعد از اون توی رویداد کلیک باتونتون این کد رو بنویسید

Public Class Form1
Private Sub Button1_Click_1(sender As Object, e As EventArgs) Handles Button1.Click
WebBrowser1.Navigate(TextBox1.Text)
End Sub
End Class

[mohanad1993]

اینم برنامش:لبخندساده: