Warning: file_get_contents(/data/phpspider/zhask/data//catemap/1/vb.net/16.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
Vb.net 两个“;“期望的表达”;visualbasic中的错误_Vb.net_Expression - Fatal编程技术网

Vb.net 两个“;“期望的表达”;visualbasic中的错误

Vb.net 两个“;“期望的表达”;visualbasic中的错误,vb.net,expression,Vb.net,Expression,我正在使用VisualBasic2008。我去发布我的项目,我得到了两个“Expression expected”错误。我对VisualBasic非常陌生-我昨晚才开始学习。守则: Public Class Form1 Private Sub WebBrowser1_DocumentCompleted(ByVal sender As System.Object, ByVal e As System.Windows.Forms.WebBrowserDocumentCompletedEventAr

我正在使用VisualBasic2008。我去发布我的项目,我得到了两个“Expression expected”错误。我对VisualBasic非常陌生-我昨晚才开始学习。守则:

Public Class Form1

Private Sub WebBrowser1_DocumentCompleted(ByVal sender As System.Object, ByVal e As System.Windows.Forms.WebBrowserDocumentCompletedEventArgs)
    WebBrowser1.Navigate("www.zudostudios.com")
End Sub

Private Sub GoBtn1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
    WebBrowser1.Navigate(addressTxt.Text)
End Sub

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

End Sub

Private Sub TextBox1_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles addressTxt.TextChanged

End Sub

Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
    TextBox1_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles addressTxt.TextChanged
End Sub

Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)

End Sub

Private Sub Button3_Click_1(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click
    WebBrowser1.Navigate("www.zudostudios.com")
End Sub

Private Sub Label1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)      Handles Label1.Click

End Sub
End Class

这是一个复制粘贴错误

您已经实现了以下代码

Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
    TextBox1_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles addressTxt.TextChanged
End Sub
但是当调用方法
TextBox1\u TextChanged
时,
处理addressTxt.TextChanged
是无用的

正确的代码应为:

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

我试过那个新密码。我仍然得到2个表达式预期错误。每一个都会让我看到你代码中的“ByVals”。谢谢-尽管如此,我还是想出了如何执行WebBrowser1.refresh()或其他操作。现在可以了,谢谢:)