buttone avalo k bezani farc ro mifreste buttone dovomo k bezani eng daryaft mikone!
dg khalaqiatesh pa khodet
dg khalaqiatesh pa khodet
- Code:
Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
WebBrowser1.Navigate("http://translate.google.com/#fa/en/")
End Sub
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
WebBrowser1.Document.GetElementById("source").InnerText = TextBox1.Text
End Sub
Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
TextBox2.Text = WebBrowser1.Document.GetElementById("result_box").OuterText
End Sub