通过

使用 ADO.NET 和 Visual Basic .NET 以编程方式创建 SQL Server 数据库

本文介绍如何使用 ADO.NET 和 Visual Basic .NET 以编程方式创建Microsoft SQL Server 数据库。

原始产品版本： ADO.NET Visual Basic .NET
原始 KB 数： 305079

总结

程序员通常需要以编程方式创建数据库。 本文介绍如何使用 ADO.NET 和 Visual Basic .NET 以编程方式创建 SQL Server 数据库。

创建示例的步骤

  1. 创建新的 Visual Basic .NET Windows 应用程序项目。 Form1 默认添加到项目中。

  2. 在 Form1 上放置命令按钮，并将其Name属性btnCreateDatabase更改为和属性Text。Create Database

  3. 将以下代码行复制并粘贴到 Form1 的“常规声明”部分：

    Imports System.Data.SqlClient

  4. 复制并粘贴区域“Windows 窗体设计器生成的代码”后面的以下代码：

    Private Sub btnCreateDatabase_Click(ByVal sender As System.Object, _
ByVal e As System.EventArgs) Handles btnCreateDatabase.Click
Dim str As String

Dim myConn As SqlConnection = New SqlConnection("Server=(local)\netsdk;" & _
"uid=sa;pwd=;database=master")

str = "CREATE DATABASE MyDatabase ON PRIMARY " & _
"(NAME = MyDatabase_Data, " & _
" FILENAME = 'D:\MyFolder\MyDatabaseData.mdf', " & _
" SIZE = 2MB, " & _
" MAXSIZE = 10MB, " & _
" FILEGROWTH = 10%)" & _
" LOG ON " & _
"(NAME = MyDatabase_Log, " & _
" FILENAME = 'D:\MyFolder\MyDatabaseLog.ldf', " & _
" SIZE = 1MB, " & _
" MAXSIZE = 5MB, " & _
" FILEGROWTH = 10%)"

Dim myCommand As SqlCommand = New SqlCommand(str, myConn)

Try
myConn.Open()
myCommand.ExecuteNonQuery()
MessageBox.Show("Database is created successfully", _
"MyProgram", MessageBoxButtons.OK, _
MessageBoxIcon.Information)
Catch ex As Exception
MessageBox.Show(ex.ToString())
Finally
If (myConn.State = ConnectionState.Open) Then
myConn.Close()
End If
End Try

End Sub

  5. 更改连接字符串以指向 SQL Server，并确保数据库参数设置为 Master 或空白。

  6. 按 F5 或 Ctrl+F5 运行项目，然后单击“ 创建数据库”。

其他注释

  • 此代码创建具有特定属性的自定义数据库。

  • 保存创建的.mdf和 .ldf 文件的文件夹必须已存在，然后才能运行代码或生成异常。

  • 如果要创建类似于 SQL Server 模型数据库和默认位置的数据库，请在代码中更改 str 变量：

    str = "CREATE DATABASE MyDatabase"

参考

  • Last updated on