VB.NET System.Argument 异常答案

【问题标题】：VB.NET System.Argument ExceptionVB.NET System.Argument 异常
【发布时间】：2014-10-23 19:04:11
【问题描述】：

我是 vb .net 编程的新手，当我尝试将表单按钮连接到 MySql 数据库时遇到以下错误： System.Data.dll 中出现“System.ArgumentException”类型的未处理异常附加信息：不支持关键字。我一直在努力解决这个错误，但我没有成功。感谢您提供的任何帮助！请参阅我的以下课程代码：

导入 MySql.Data.MySqlClient 公开课形式1

Dim connect As New MySqlConnection

Dim connecto As String = "Server=localhost; User Id=root; Password; Database=sist"
Private Sub GroupBox1_Enter(sender As Object, e As EventArgs) Handles GroupBox1.Enter

End Sub

Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
    connect.ConnectionString = connecto
    Try
        connect.Open()
        MessageBox.Show("Connected Successfully")
    Catch ex As MySqlException
        MessageBox.Show(ex.Message)
    End Try


End Sub

Private Sub TextBox1_TextChanged(sender As Object, e As EventArgs) Handles TextBox1.TextChanged

End Sub

Private Sub Label4_Click(sender As Object, e As EventArgs) Handles Label4.Click

End Sub

Private Sub Timer1_Tick(sender As Object, e As EventArgs) Handles Timer1.Tick
    Label4.Text = Date.Now.ToString("MMM dd yyyy hh:mm:ss")
End Sub

Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
    Timer1.Enabled = True
End Sub

Private Sub LinkLabel1_LinkClicked(sender As Object, e As LinkLabelLinkClickedEventArgs)

End Sub

结束类

【问题讨论】：

除了连接并打开连接之外什么都不做。这是您的连接字符串的正确格式吗？（旁注 - 您应该在 finally 块中关闭连接）

标签： vb.net exception unhandled

【解决方案1】：

connect.ConnectionString = connecto

您在 Button1_Click 子中的第一行引用了 connect 和 connecto。但是这些对象超出了 sub 的范围。您可以将实例移动到 sub 内，它会起作用。

所以：

Dim connect As New MySqlConnection
Dim connecto As String = "Server=localhost; User Id=root; Password; Database=sist"
connect.ConnectionString = connecto
    Try
        connect.Open()
        MessageBox.Show("Connected Successfully")
    Catch ex As MySqlException
        MessageBox.Show(ex.Message)
    End Try

或者更好

Dim connecto As String = "Server=localhost; User Id=root; Password; Database=sist"

Using connect As New MySqlConnection(connecto)
        Try
            connect.Open()
            MessageBox.Show("Connected Successfully")
        Catch ex As MySqlException
            MessageBox.Show(ex.Message)
        End Try
End Using

【讨论】：

这个错误仍然存在，请提供任何帮助.....这是我的代码 Imports MySql.Data.MySqlClient Public Class Form1 Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click Dim connect As New MySqlConnection Dim connecto As String = "Server=localhost; User Id=root; Password; Database=sist" connect.ConnectionString = connecto Try connect.Open() MessageBox.Show("Connected Successfully") Catch ex As MySqlException MessageBox.Show(ex.Message) End Try End Sub End Class
看不懂...尝试编辑您的原始问题并使用代码格式化程序。也可以尝试给 Password 一个值。