Visual Basic 教程（第七章）

引言

在前面的章节中，我们深入学习了Visual Basic（VB）的图形用户界面（GUI）编程，包括对话框的使用、多窗体应用程序的创建、拖放操作以及剪切板操作。这些知识点为我们构建功能丰富、交互性强的Windows应用程序提供了坚实的基础。本章将进一步扩展我们的知识领域，探讨VB中的数据库编程基础，包括如何连接数据库、执行SQL查询、以及如何在VB应用程序中显示和操作数据库数据。

第七章：数据库编程基础

7.1 数据库简介

在开始VB的数据库编程之前，我们先简要回顾一下数据库的基本概念。数据库是一个有组织的数据集合，用于存储和管理信息。它通常包含多个表（Table），每个表由行（Row）和列（Column）组成，分别代表记录和数据字段。

7.2 VB中的数据库连接

在VB中，你可以使用ADO.NET来连接和操作数据库。ADO.NET是一组类，提供了对数据源的高性能访问，并支持多种数据源，包括SQL Server、Oracle、MySQL等。

• 连接字符串：要连接到数据库，你需要一个连接字符串，它包含了数据库的位置、名称、认证信息等。
• SqlConnection：这是ADO.NET中用于建立数据库连接的类。

示例：连接到SQL Server数据库

Dim connectionString As String = "Server=myServerAddress;Database=myDataBase;User Id=myUsername;Password=myPassword;"  
Using conn As New SqlConnection(connectionString)  
    Try  
        conn.Open()  
        ' 数据库连接已打开，可以在这里执行SQL命令  
        MessageBox.Show("数据库连接成功！")  
    Catch ex As Exception  
        MessageBox.Show("数据库连接失败：" & ex.Message)  
    Finally  
        conn.Close()  
    End Try  
End Using

7.3 执行SQL查询

连接到数据库后，你可以使用SqlCommand类来执行SQL查询。这包括SELECT、INSERT、UPDATE和DELETE等SQL语句。

• SqlCommand：用于执行SQL语句或存储过程的类。
• SqlDataReader：用于从SQL查询中读取数据的类，适用于逐行读取大量数据。
• DataAdapter和DataTable：用于将数据库查询结果加载到内存中的DataTable对象中，适用于需要频繁访问查询结果的情况。

示例：执行SELECT查询并显示结果

Dim connectionString As String = "..."  
Dim query As String = "SELECT * FROM MyTable"  
Using conn As New SqlConnection(connectionString)  
    Using cmd As New SqlCommand(query, conn)  
        Try  
            conn.Open()  
            Using reader As SqlDataReader = cmd.ExecuteReader()  
                While reader.Read()  
                    ' 假设MyTable有一个名为"Name"的列  
                    MessageBox.Show(reader("Name").ToString())  
                End While  
            End Using  
        Catch ex As Exception  
            MessageBox.Show("查询失败：" & ex.Message)  
        End Try  
    End Using  
End Using

注意：在实际应用中，直接在循环中显示消息框可能不是最佳做法，这里只是为了演示如何读取数据。

7.4 使用DataTable和DataGridView显示数据

为了更方便地在VB应用程序中显示和操作数据库数据，你可以使用DataTable来存储查询结果，并使用DataGridView控件来显示这些数据。

• DataTable：表示内存中的表数据结构，可以包含从数据库查询中检索的数据。
• DataGridView：是一个功能丰富的控件，用于在Windows窗体应用程序中显示和操作表格数据。

示例：将数据库查询结果显示在DataGridView中

Dim connectionString As String = "..."  
Dim query As String = "SELECT * FROM MyTable"  
Dim dt As New DataTable()  
Using conn As New SqlConnection(connectionString)  
    Using cmd As New SqlCommand(query, conn)  
        Using da As New SqlDataAdapter(cmd)  
            Try  
                conn.Open()  
                da.Fill(dt) ' 将查询结果填充到DataTable中  
                DataGridView1.DataSource = dt ' 将DataTable设置为DataGridView的数据源  
            Catch ex As Exception  
                MessageBox.Show("加载数据失败：" & ex.Message)  
            End Try  
        End Using  
    End Using  
End Using

7.5 数据库事务

数据库事务是一组作为一个工作单元执行的SQL语句，这些语句要么全部成功，要么在遇到错误时全部回滚到原始状态。在VB中，你可以使用SqlTransaction类来管理事务。

总结

本章介绍了Visual Basic中的数据库编程基础，包括数据库连接、执行SQL查询、使用