Microsoft Visual Basic 2008 Express Editionステートメントの終了予定

Question

YouTubeビデオをフォローして作成したWebブラウザをテストしようとしました。しかし、それは動作しません。何が問題なの？

はここで、それは非常に難しいお手伝いをすることができます私のコード

Public Class Form1 

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load 
    WebBrowser1.Navigate("www.google.com") 
End Sub 

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click 
    WebBrowser1.GoBack() 
End Sub 

Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click 
    WebBrowser1.GoForward() 
End Sub 

Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click 
    WebBrowser1.Navigate(TextBox1.Text) 
End Sub 

Private Sub Button4_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button4.Click 
    WebBrowser1.Navigate("http://www.google.com/search?g=") & (TextBox2.Text) 
End Sub 

Private Sub Button5_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button5.Click 
    WebBrowser1.Stop() 
End Sub 

Private Sub Button6_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button6.Click 
    WebBrowser1.Refresh() 
End Sub 

End Class 

Answer 1

エラーが発生した場所をあなたが言うことはありません、です。あなたの問題は、この行にあるようにしかし、それはなります

WebBrowser1.Navigate("http://www.google.com/search?g=") & (TextBox2.Text) 

これは

WebBrowser1.Navigate("http://www.google.com/search?g=" & TextBox2.Text) 

それがあるとして、あなたは、単独行の式を持っていなければなりません。連結は意味をなさない。将来的には

---

、（「は、なぜ、このコードが動作しない？」）のデバッグ助けを求めるMinimal, Complete, and Verifiable example.質問を必ずしてください希望の動作が含まれている必要があり、特定の問題やエラーと最短コードが必要そのものをに複製してください。 のない質問は明確な問題文は他の読者には役に立たない。

Answer 2

私はそれを理解しました。私はYouTuberを受信し、彼らは返答しました。これは正しいコードです。

パブリック・クラスのForm1

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load 
    WebBrowser1.Navigate("www.google.com") 
End Sub 

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click 
    WebBrowser1.GoBack() 
End Sub 

Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click 
    WebBrowser1.GoForward() 
End Sub 

Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click 
    WebBrowser1.Navigate(TextBox1.Text) 
End Sub 

Private Sub Button4_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button4.Click 
    WebBrowser1.Navigate("http://www.google.com/search?g=" & TextBox2.Text) 
End Sub 

Private Sub Button5_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button5.Click 
    WebBrowser1.Stop() 
End Sub 

Private Sub Button6_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button6.Click 
    WebBrowser1.Refresh() 
End Sub 

エンドクラス