在Visual Basic中连接MySQL数据库进行增删改查操作，咱们可以使用MySQL Connector/NET（官方提供的MySQL连接库）来实现。
以下是一个简单的示例，演示如何连接MySQL数据库并执行增删改查操作。在开始之前，确保已经安装了MySQL Connector/NET。
- 添加引用：
- 打开Visual Basic项目。
- 在“解决方案资源管理器”中，右键单击“引用”并选择“添加引用”。
- 在“添加引用”对话框中，选择“浏览”选项卡，并浏览到MySQL Connector/NET的安装目录（通常是C:\Program Files\MySQL\MySQL Connector Net X.XX）。
- 选择以下DLL文件并添加引用：
- MySql.Data.dll
- 导入命名空间： 在VB.NET代码中导入MySQL Connector的命名空间。
Imports MySql.Data.MySqlClient
- 连接到MySQL数据库：
Dim connStr As String = "Server=YourServer;Database=YourDatabase;User=YourUser;Password=YourPassword;"
Dim conn As MySqlConnection = New MySqlConnection(connStr)
Try
conn.Open()
' 连接已打开，可以执行查询
Catch ex As Exception
' 处理连接错误
Finally
conn.Close()
End Try
注意要将 YourServer、YourDatabase、YourUser 和 YourPassword 替换为你自己的MySQL服务器信息。
- 执行查询操作：
- 插入数据：
Dim query As String = "INSERT INTO YourTable (Column1, Column2) VALUES (@Value1, @Value2)"
Using cmd As New MySqlCommand(query, conn)
cmd.Parameters.AddWithValue("@Value1", "Value1")
cmd.Parameters.AddWithValue("@Value2", "Value2")
cmd.ExecuteNonQuery()
End Using
- 更新数据：
Dim query As String = "UPDATE YourTable SET Column1 = @Value1 WHERE Column2 = @Value2"
Using cmd As New MySqlCommand(query, conn)
cmd.Parameters.AddWithValue("@Value1", "NewValue1")
cmd.Parameters.AddWithValue("@Value2", "OldValue2")
cmd.ExecuteNonQuery()
End Using
- 删除数据：
Dim query As String = "DELETE FROM YourTable WHERE Column1 = @Value1"
Using cmd As New MySqlCommand(query, conn)
cmd.Parameters.AddWithValue("@Value1", "ValueToDelete")
cmd.ExecuteNonQuery()
End Using
- 查询数据：
Dim query As String = "SELECT Column1, Column2 FROM YourTable WHERE Column1 = @Value1"
Using cmd As New MySqlCommand(query, conn)
cmd.Parameters.AddWithValue("@Value1", "ValueToSearch")
Using reader As MySqlDataReader = cmd.ExecuteReader()
While reader.Read()
Dim value1 As String = reader("Column1").ToString()
Dim value2 As String = reader("Column2").ToString()
' 处理查询结果
End While
End Using
End Using
以上代码示例中的 YourTable、Column1、Column2、@Value1、@Value2 等都需要根据你自己的实际数据库表结构和数据来进行调整。
另外注意，需要在查询中使用参数化查询，以防止SQL注入攻击。
