钟二网络头像

钟二网络

探索SQL查询技巧、Linux系统运维以及Web开发前沿技术,提供一站式的学习体验

  • 文章92531
  • 阅读1072795
首页 SQL 正文内容

vb增删改查sql数据库

钟逸 SQL 2024-05-09 08:33:18 51

在VB中操作SQL数据库,实现增删改查操作,可以为您提供便捷高效的数据管理解决方案。本文将逐步指导您使用VB代码实现这些基本操作。

新增记录

要向数据库中新增记录,请使用以下代码:

vb

Dim connection As New SqlConnection

connection.ConnectionString = "YourConnectionString"

connection.Open()

Dim command As New SqlCommand

command.Connection = connection

command.CommandText = "INSERT INTO YourTable (Column1, Column2) VALUES (@Value1, @Value2)"

command.Parameters.AddWithValue("@Value1", "YourValue1")

command.Parameters.AddWithValue("@Value2", "YourValue2")

command.ExecuteNonQuery()

connection.Close()

其中, YourConnectionString 应替换为实际的数据库连接字符串, YourTable 是目标表名, Column1 和 Column2 是目标列名, YourValue1 和 YourValue2 是插入的数据值。

删除记录

要从数据库中删除记录,请使用以下代码:

vb

Dim connection As New SqlConnection

connection.ConnectionString = "YourConnectionString"

connection.Open()

Dim command As New SqlCommand

command.Connection = connection

command.CommandText = "DELETE FROM YourTable WHERE ID = @ID"

command.Parameters.AddWithValue("@ID", "YourID")

command.ExecuteNonQuery()

connection.Close()

其中, YourID 应替换为要删除记录的主键值。

更新记录

要更新数据库中现有记录,请使用以下代码:

vb

Dim connection As New SqlConnection

connection.ConnectionString = "YourConnectionString"

connection.Open()

Dim command As New SqlCommand

command.Connection = connection

command.CommandText = "UPDATE YourTable SET Column1 = @Value1, Column2 = @Value2 WHERE ID = @ID"

command.Parameters.AddWithValue("@Value1", "YourValue1")

command.Parameters.AddWithValue("@Value2", "YourValue2")

command.Parameters.AddWithValue("@ID", "YourID")

command.ExecuteNonQuery()

connection.Close()

其中, YourValue1 和 YourValue2 是更新后的数据值, YourID 是目标记录的主键值。

查询记录

要从数据库中查询记录,请使用以下代码:

vb

Dim connection As New SqlConnection

connection.ConnectionString = "YourConnectionString"

connection.Open()

Dim command As New SqlCommand

command.Connection = connection

command.CommandText = "SELECT * FROM YourTable"

Dim reader As SqlDataReader = command.ExecuteReader()

While reader.Read()

Console.WriteLine(reader("Column1").ToString())

End While

reader.Close()

connection.Close()

其中, YourTable 是目标表名, reader 用于遍历查询结果。

更多信息

有关VB中操作SQL数据库的更多信息,请参考微软官方文档或其他相关资源。

文章目录
    搜索