VB中怎么连接数据库并用代码添加创建一个新数据表格？

在Visual Basic（VB）应用程序中集成数据库功能，特别是创建和操作数据表格，是构建强大、数据驱动型程序的核心技能，这一过程并非在VB界面中直接“画”出一个表格，而是通过代码与数据库管理系统（DBMS）进行通信，发送指令来完成，本文将详细介绍在VB.NET环境中如何通过代码连接数据库并添加数据表格,涵盖从基础概念到具体实践的关键步骤。

核心概念：连接对象与命令对象

在VB.NET中进行数据库操作，主要依赖于ADO.NET技术，其核心思想是建立两个关键对象：连接对象和命令对象。

• 连接对象：负责与数据库建立通信链路，它需要一个最重要的信息——连接字符串，这包含了数据库类型、服务器地址、数据库名称、用户凭据等。
• 命令对象：负责执行对数据库的具体操作指令，通常是SQL（Structured Query Language）语句，对于添加表格，我们使用的SQL语句是 CREATE TABLE。

整个流程可以概括为：使用连接对象打开通道，通过命令对象将SQL CREATE TABLE 指令发送给数据库，数据库执行完毕后返回结果,最后关闭连接。

分步实施：从连接到创建表

以下是在VB.NET中创建一个数据库表格的详细步骤。

第一步：选择数据库与准备连接

明确你要使用的数据库类型,常见的选择有：

1. SQL Server：功能强大的企业级关系数据库,适合中大型应用。
2. Microsoft Access (ACCDB/MDB)：轻量级的文件型数据库，适合小型桌面应用,无需独立服务器。
3. SQLite：一个开源、轻量级、嵌入式的数据库引擎,非常适合小型应用和移动开发。

选定后，你需要准备对应的连接字符串，连接到本地SQL Server实例中的“MyDatabase”数据库,连接字符串可能如下：

Data Source=(LocalDB)MSSQLLocalDB;Initial Catalog=MyDatabase;Integrated Security=True

连接到一个Access数据库文件（C:DataMyDB.accdb）的连接字符串则为：

Provider=Microsoft.ACE.OLEDB.12.0;Data Source=C:DataMyDB.accdb

第二步：编写CREATE TABLE SQL语句

这是定义表格结构的关键，你需要指定表名以及每个列的名称、数据类型和约束（如主键、是否允许为空等）。

假设我们要创建一个名为Users的表，包含用户ID（整数，主键）、用户名（文本，不能为空）和注册日期（日期）,SQL语句如下：

CREATE TABLE Users (
    UserID INT PRIMARY KEY IDENTITY(1,1),
    UserName NVARCHAR(50) NOT NULL,
    RegistrationDate DATE
)

• PRIMARY KEY：将UserID设为主键。
• IDENTITY(1,1)：（SQL Server特有）表示UserID是自增列，从1开始,每次递增1。
• NVARCHAR(50)：可变长度的Unicode字符串,最多50个字符。
• NOT NULL：该列不允许为空值。

第三步：在VB.NET中执行SQL

我们将上述步骤整合到VB.NET代码中，以下是一个完整的示例，演示如何连接到SQL Server并创建Users表。

' 首先导入必要的命名空间
Imports System.Data.SqlClient
Public Class Form1
    Private Sub CreateTableButton_Click(sender As Object, e As EventArgs) Handles CreateTableButton.Click
        ' 1. 定义连接字符串
        Dim connectionString As String = "Data Source=(LocalDB)MSSQLLocalDB;Initial Catalog=MyDatabase;Integrated Security=True"
        ' 2. 定义CREATE TABLE的SQL语句
        Dim createTableSql As String = "
            CREATE TABLE Users (
                UserID INT PRIMARY KEY IDENTITY(1,1),
                UserName NVARCHAR(50) NOT NULL,
                RegistrationDate DATE
            );"
        ' 3. 创建连接和命令对象
        Using connection As New SqlConnection(connectionString)
            Using command As New SqlCommand(createTableSql, connection)
                Try
                    ' 4. 打开连接
                    connection.Open()
                    ' 5. 执行命令（ExecuteNonQuery用于执行不返回结果集的命令，如CREATE, INSERT, UPDATE, DELETE）
                    command.ExecuteNonQuery()
                    MessageBox.Show("数据表 'Users' 创建成功！", "成功", MessageBoxButtons.OK, MessageBoxIcon.Information)
                Catch ex As SqlException
                    ' 捕获并处理可能发生的SQL错误，例如表已存在
                    MessageBox.Show("创建表时出错: " & ex.Message, "错误", MessageBoxButtons.OK, MessageBoxIcon.Error)
                End Try
            End Using ' command对象会在此处自动释放
        End Using ' connection对象会在此处自动释放
    End Sub
End Class

代码说明：

• Using语句确保数据库连接和命令在操作完成后能被正确关闭和释放，即使发生错误也不例外,这是非常好的编程习惯。
• Try...Catch块用于捕获异常，例如如果Users表已经存在，再次运行代码会抛出错误,此时可以给用户一个友好的提示。
• ExecuteNonQuery()方法专用于执行不返回数据行的操作，非常适合CREATE TABLE。

数据访问技术对比

除了直接使用ADO.NET，现代VB.NET开发还可以利用更高级的技术，如Entity Framework (EF),下表简要对比了它们的特点：

特性	ADO.NET (SqlCommand)	Entity Framework (EF Core)
控制级别	高，可以直接编写和优化SQL	中等，由EF将LINQ查询转换为SQL
学习曲线	较陡峭，需要理解SQL和连接对象	较平缓，更面向对象，对SQL新手友好
代码抽象	较低，代码与数据库结构紧密相关	高，通过模型类操作数据库，实现解耦
开发效率	对于简单CRUD操作较慢	对于复杂业务逻辑和模型变更效率更高

对于初学者和简单的项目，直接使用ADO.NET能让你更深入地理解数据库交互的本质，对于大型、复杂的项目，Entity Framework等ORM框架则能显著提升开发效率和代码的可维护性。

---

相关问答FAQs

问题1：表格创建成功后，我该如何向其中添加数据？

解答：向表格中添加数据同样是通过SQL命令完成的，这次使用的是 INSERT INTO 语句，在VB.NET代码中，你只需替换掉之前用于创建表的SQL字符串，并使用新的 INSERT 语句，为了防止SQL注入攻击，强烈建议使用参数化查询。

示例代码片段：

' ... (connectionString 和 Using 代码块与之前相同)
Dim insertSql As String = "INSERT INTO Users (UserName, RegistrationDate) VALUES (@UserName, @RegDate);"
Using command As New SqlCommand(insertSql, connection)
    ' 添加参数并赋值
    command.Parameters.AddWithValue("@UserName", "张三")
    command.Parameters.AddWithValue("@RegDate", DateTime.Now.Date)
    connection.Open()
    command.ExecuteNonQuery() ' 执行插入命令
End Using
' ...

这段代码会向Users表中插入一条新记录，用户名为“张三”,注册日期为当天。

问题2：“连接字符串”应该写在哪里最安全、最方便管理？

解答：绝对要避免将连接字符串硬编码在代码中（如写在按钮点击事件里），这样做不仅修改困难，而且在代码分发后存在严重的安全隐患,最佳实践是将其存储在应用程序的配置文件中。

• 对于桌面应用：将连接字符串添加到项目的 App.config 文件中的 <connectionStrings> 节点。

  <configuration>
    <connectionStrings>
      <add name="MyDBConnection" 
           connectionString="Data Source=(LocalDB)MSSQLLocalDB;Initial Catalog=MyDatabase;Integrated Security=True" 
           providerName="System.Data.SqlClient" />
    </connectionStrings>
  </configuration>

• 对于Web应用：则存储在 Web.config 文件中,方式相同。

在VB代码中，你可以使用 My.Settings (项目设置) 或 ConfigurationManager 类来轻松读取这个字符串，从而实现了代码与配置的分离,便于维护和部署。