使用 Visual Basic 建立与数据库的无缝连接 (使用visualsyudio编程)

在软件开发中，经常需要访问和操作数据库。VisualBasic 作为一种强大的编程语言，提供了与数据库进行无缝连接和交互的工具。

建立连接

要建立与数据库的连接，可以使用 ADO.NET 库中的 SqlConnection 类。该类的构造函数需要提供数据库连接字符串，其中包含有关要连接的数据库的必要信息，如服务器名称、数据库名称、用户 ID 和密码。

Imports System.Data.SqlClientPublic Class Form1Dim con As SqlConnectionPrivate Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load' 创建连接字符串Dim connectionString As String = "Server=myServerAddress;Database=myDataBase;User Id=myUsername;Password=myPassword;"' 建立连接con = New SqlConnection(connectionString)End Sub
End Class

执行查询

一旦建立了连接，就可以使用 SqlCommand 类执行 SQL 查询。此类提供了一个 ExecuteReader 方法，该方法返回一个 SqlDataReader 对象，其中包含查询结果。

Public Class Form1' ...Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click' 创建查询命令Dim cmd As SqlCommand = New SqlCommand("SELECT  FROM Customers", con)' 执行查询并读取结果Dim reader As SqlDataReader = cmd.ExecuteReader()While reader.Read()Console.WriteLine("Customer ID: {0}", reader.GetInt32(0))Console.WriteLine("Customer Name: {0}", reader.GetString(1))End Whilereader.Close()End Sub
End Class

插入、更新和删除数据

除了执行查询之外，还可以使用 SqlCommand 类执行更新、插入和删除操作。这些操作可以使用 ExecuteNonQuery 方法完成。

Public Class Form1' ...Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click' 创建更新命令Dim cmd As SqlCommand = New SqlCommand("UPDATE Customers SET CustomerName = 'New Name' WHERE CustomerID = 1", con)' 执行更新并获取受影响的行数Dim rowsAffected As Integer = cmd.ExecuteNonQuery()Console.WriteLine("{0} 行受到影响", rowsAffected)End Sub
End Class

使用事务

在进行涉及多个操作的数据库操作时，使用事务非常重要。事务允许您将多个操作分组到一个逻辑单元中，以便所有操作都成功执行或全部失败。

Public Class Form1' ...Private Sub Button3_Click(sender As Object, e As EventArgs) Handles Button3.ClickDim tran As SqlTransactionTry' 开始事务tran = con.BeginTransaction()' 创建插入命令Dim cmd1 As SqlCommand = New SqlCommand("INSERT INTO Customers (CustomerName) VALUES ('New Customer')", con, tran)' 执行插入操作cmd1.ExecuteNonQuery()' 创建更新命令Dim cmd2 As SqlCommand = New SqlCommand("UPDATE Customers SET CustomerName = 'Updated Name' WHERE CustomerID = 2", con, tran)' 执行更新操作cmd2.ExecuteNonQuery()' 提交事务tran.Commit()Console.WriteLine("事务已成功提交")Catch ex As Exception' 回滚事务If Not tran Is Nothing Then tran.Rollback()Console.WriteLine("事务回滚：" & ex.Message)End TryEnd Sub
End Class

关闭连接

在完成与数据库交互后，重要的是关闭连接以释放资源。可以使用 SqlConnection 类中的 Close 方法来实现此目的。

Public Class Form1' ...Private Sub Form1_Closing(sender As Object, e As CancelEventArgs) Handles MyBase.Closing' 关闭连接con.Close()End Sub
End Class

总结

本文介绍了如何使用 Visual Basic 建立与数据库的无缝连接。从建立连接到执行查询并执行更新、插入和删除操作，本文提供了逐步指南。还讨论了使用事务的重要性以及在完成时关闭连接的最佳实践。

通过遵循这些步骤，您可以轻松地建立与数据库的连接并在您的 Visual Basic 应用程序中与之进行交互。