
vb(vb.net) WebBrowser控件的使用问题 很菜 看下什么原因 急 搞定马上给分.. 25
PrivateSubButton1_Click(ByValsenderAsSystem.Object,ByValeAsSystem.EventArgs)HandlesBu...
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Web.Navigate("http://translate.google.com/translate_t#en|zh-CN|" & TextBox1.Text.Trim)
End Sub
Private Sub Web_DocumentCompleted(ByVal sender As Object, ByVal e As System.Windows.Forms.WebBrowserDocumentCompletedEventArgs) Handles Web.DocumentCompleted
Dim b As String = ""
Dim c = Web.Document.GetElementsByTagName("td")
b = c.Item(13).OuterText
RichTextBox1.Clear()
RichTextBox1.AppendText(b)
End Sub
我用以上方法获取谷歌的翻译结果 但是每次输入后要按两次按钮才有结果 不知道什么原因 麻烦会的看下 搞定再给分
busy 是什么属性? 展开
Web.Navigate("http://translate.google.com/translate_t#en|zh-CN|" & TextBox1.Text.Trim)
End Sub
Private Sub Web_DocumentCompleted(ByVal sender As Object, ByVal e As System.Windows.Forms.WebBrowserDocumentCompletedEventArgs) Handles Web.DocumentCompleted
Dim b As String = ""
Dim c = Web.Document.GetElementsByTagName("td")
b = c.Item(13).OuterText
RichTextBox1.Clear()
RichTextBox1.AppendText(b)
End Sub
我用以上方法获取谷歌的翻译结果 但是每次输入后要按两次按钮才有结果 不知道什么原因 麻烦会的看下 搞定再给分
busy 是什么属性? 展开
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询