Vb.net 语法错误，FlatAlertBox不是'；FormSkin 1.FormSkin'；

我已经纠正了大部分错误。我现在只得到语法错误。这表明ByVal导致了语法错误

导入系统.Net 导入System.IO 公开课表格1

Private Sub FlatButton1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles FlatButton1.Click
        ByVal e As System.EventArgs) Handles FlatButton1.Click
    Dim hostname As IPHostEntry = Dns.GetHostEntry(FlatTextBox1.Text)
    Dim ip As IPAddress() = hostname.AddressList
    FlatAlertBox1.Text = ip(0).ToString()
End Sub

---

结束类

您的函数签名已损坏。看一看（重新间隔以对齐）：

---

看起来像是复制/粘贴错误。一旦函数签名被关闭，您就不能继续使用它。

我修复了其中的大部分，但仍然会出现语法错误。它显示语法错误，当我单击它时，它将标记为ByVal

Private Sub FlatButton1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles FlatButton1.Click
                                                             ByVal e As System.EventArgs) Handles FlatButton1.Click