0

私はVB.Net getでテキストボックス1に入力した文字列を取得し、Webブラウザを介してテキストボックスID「wgo」に送信し、その後送信をクリックする簡単な関数を作成しました。すべてのコード パスで値を返します。」警告を修正する方法、または textbox1.text メッセージを別の形式でキャプチャする方法を誰かが知っている場合。私にお知らせください。

私が使用しているコードの一部を次に示します。

    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 を初めて使用するので、気楽にやってください。再度、感謝します！

4

1 に答える 1

0

あなたの関数は何も返しません！

これは、次のように変更する必要がある望ましい動作ですSub。

Sub GetMessage()
    WebBrowser1.Document.GetElementById("wgo").SetAttribute("value", TextBox1.Text)
End Sub
于 2013-02-27T22:40:53.830 に答える