Visual Basic (VB)是一种强大的编程语言,可用于开发各种应用程序,包括数据库应用程序。为了连接到数据库,VB 使用一系列对象,包括
Connection
、
Command
和
DataReader
对象。
连接字符串是一个字符串,其中包含用于连接到数据库所需的信息,例如服务器名称、数据库名称、用户 ID 和密码。以下是结果集
可以使用
DataReader
对象循环遍历查询结果。以下代码演示如何获取每一行的每一列的值:
While Dr.Read()Dim Col1 As String = Dr(0).ToString()Dim Col2 As Integer = Dr(1).ToString()End While
使用
Command
对象执行更新语句,例如 INSERT、UPDATE 和 DELETE。可以使用
ExecuteNonQuery
方法执行更新并返回受影响的行数。
Dim Cmd As New System.Data.SQLClient.SqlCommand("INSERT INTO MyTable (Col1, Col2) VALUES ('Value1', 10)", Conn)Dim RowsAffected As Integer = Cmd.ExecuteNonQuery()
使用
Close
方法关闭与数据库的连接。建议在不再需要连接时立即关闭连接,以释放资源。
Conn.Close()
下面的完整代码示例演示了如何连接到数据库、执行查询和更新:
Dim ConnStr As String = "Data Source=MyServer;Initial Catalog=MyDatabase;User ID=MyUser;Password=MyPassword;"Dim Conn As New System.Data.SqlClient.SqlConnection(ConnStr)If Conn.State <> System.Data.ConnectionState.Open ThenConn.Open()End IfDim Cmd As New System.Data.SqlClient.SqlCommand("SELECT FROM MyTable", Conn)Dim Dr As System.Data.SqlClient.SqlDataReader = Cmd.ExecuteReader()While Dr.Read()Dim Col1 As String = Dr(0).ToString()Dim Col2 As Integer = Dr(1).ToString()End WhileDr.Close()Dim Cmd2 As New System.Data.SqlClient.SqlCommand("INSERT INTO MyTable (Col1, Col2) VALUES ('Value1', 10)", Conn)Dim RowsAffected As Integer = Cmd2.ExecuteNonQuery()Conn.Close()
使用 VB连接到数据库并执行查询和更新是一个相对简单的过程。通过理解连接字符串、
Connection
、
Command
和
DataReader
对象的工作原理,您可以轻松编写应用程序与数据库交互。
本文地址:https://www.qianwe.com/article/2d14dac5386674bd9e40.html