如何使用.NET和VB編程創建SQL Server

　　概要
　　程序員常常需要以編程方式創建數據庫本文介紹如何使用 ADONET 和 Visual Basic Net 以編程方式創建 Microsoft SQL
　　
　　創建示例的步驟
　　新建一個 Visual Basic Net Windows 應用程序項目默認情況下將 Form 添加到項目中
　　在 Form 上放一個 Command 按鈕並將其 Name 屬性更改為 btnCreateDatabase將其 Text 屬性更改為 Create Database
　　復制下面一行代碼並粘貼到 Form 的general declaration部分 Imports SystemDataSqlClient
　　復制下面的代碼並粘貼到Windows Form Designer generated code區域之後
　　
　　Private Sub btnCreateDatabase_Click(ByVal sender As SystemObject _
　　ByVal e As SystemEventArgs) Handles btnCreateDatabaseClick
　　　　Dim reader As SqlDataReader
　　　　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\MyDatabaseDatamdf & _
　　　　　　　 SIZE = MB & _
　　　　　　　 MAXSIZE = MB & _
　　　　　　　 FILEGROWTH = %) & _
　　　　　　　 LOG ON & _
　　　　　　　(NAME = MyDatabase_Log & _
　　　　　　　 FILENAME = D:\MyFolder\MyDatabaseLogldf & _
　　　　　　　 SIZE = MB & _
　　　　　　　 MAXSIZE = MB & _
　　　　　　　 FILEGROWTH = %)
　　
　　　　Dim myCommand As SqlCommand = New SqlCommand(str myConn)
　　
　　Try
　　　　　　myConnOpen()
　　　　　　reader = myCommandExecuteReader()
　　　　Catch ex As Exception
　　　　　　MessageBoxShow(exToString())
　　Finally
　　　　　　If Not reader Is Nothing Then
　　readerClose()
　　　　　　　　If (myConnState = ConnectionStateOpen) Then
　　　　　　　　　　myConnClose()
　　End If
　　　　　　　　MessageBoxShow(Database is created successfully _
　　　　　　　　　　　　　　　　MyProgram MessageBoxButtonsOK _
　　　　　　　　　　　　　　　　MessageBoxIconInformation)
　　End If
　　End Try
　　End Sub
　　
　　更改連接字符串使其指向 SQL Server要確保將 Database 參數設置為 Master 或保留為空白
　　按 F 鍵或 CTRL+F 組合鍵以運行該項目然後單擊創建數據庫
　　
　　其他注意事項
　　此代碼創建的是帶有特定屬性的自定義數據庫
　　
　　將要保存所創建 mdf 和 ldf 文件的文件夾必須在運行該代碼之前就已存在否則會引發異常
　　
　　如果想創建一個類似於 SQL Server 的 Model 數據庫的數據庫並想讓它存儲在默認位置那麼請更改代碼中的 str 變量 str = CREATE DATABASE MyDatabase
From:http://tw.wingwit.com/Article/program/SQLServer/201311/22120.html