2013-02-27 75 views
0

我在VB.Net中做了一個簡單的函數獲取您輸入到文本框中的字符串,並通過webbrower發送到文本框ID「wgo」並單擊提交之後..它給我的警告「函數GetMessage()不返回所有代碼路徑上的值」。如果有人知道如何解決警告,或者如何以不同的格式捕獲textbox1.text消息;請告訴我。我使用的代碼vb.net函數不會返回所有代碼路徑的值

繼承人部分:

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click 
    Dim elements = WebBrowser1.Document.GetElementsByTagName("input") '' or whatever tag it is 
    For Each element As HtmlElement In elements 
     GetMessage() 'Get message from textbox1 and send it 
     If element.GetAttribute("className") = "submitbut" Then 
      element.InvokeMember("click") 
      MsgBox("Your ECHO has been broadcast!") 
      Exit For 
     End If 
    Next 
    TextBox2.Text = TextBox1.Text 'Displays what the sent message was 
    TextBox1.Text = ""   'Erases old message from textbox1 
    TextBox3.Text = getCurrentDateTimeString() 'Displays the time and date it was sent 
End Sub 

Function GetMessage() 
    WebBrowser1.Document.GetElementById("wgo").SetAttribute("value", TextBox1.Text) 
End Function 

任何幫助,將不勝感激!我是VB.net的新手,所以請放輕鬆點!再次感謝!

回答

0

你的函數根本沒有返回任何東西!

它這是需要的行爲,你應該將其更改爲Sub

Sub GetMessage() 
    WebBrowser1.Document.GetElementById("wgo").SetAttribute("value", TextBox1.Text) 
End Sub 
+0

哈哈,哇。我習慣於其他語言,您可以在其中定義函數並稍後調用它們。我不習慣所有較新的「功能類型?」 VB提供。謝謝,它工作<3。 – 2013-02-27 22:46:54

+0

更正:現在我得到「對象引用未設置爲對象的實例。」在「WebBrowser1.Document.GetElementById(」wgo「)。SetAttribute(」value「,TextBox1.Text)」..任何想法?也許它不認可「wgo」作爲ID? – 2013-02-27 22:48:42

+0

您可能希望將此答案標記爲正確並開始一個新問題。 – 2013-02-28 00:49:58

相關問題