Sql 如何在Linq Vb.net中更改数据库名称

我有一个数据库Linq dbml 我需要在创建之前更改数据库名称

  Dim dt As New DataSchool()
  dt.Connection.Open()
  dt.CreateDatabase()

使用此方法

Sub CreatesqldatabaseMSQL()
            Try
                Using connect As New DataSchool(GetSQLConnectionString(True))
                    connect.CreateDatabase()
                End Using
            Catch ex As Exception
               MessageBox.Show(ex.Message)
            End Try
        End Sub

GetSQLConnectionString此函数返回SQLConnectionString

  Public Function GetSQLConnectionString(ByVal includeDatabase As Boolean) As String
        Dim builder As New SqlConnectionStringBuilder()
        'Build a connection string from the user input.'
        builder.DataSource = Msql.datasource
        builder.IntegratedSecurity = Msql.IntSec
        If builder.IntegratedSecurity = False Then
            builder.UserID = Msql.username
            builder.Password = Msql.password
        End If
        If includeDatabase Then
            builder.InitialCatalog = Msql.DatabaseName
        End If
        Return builder.ConnectionString
    End Function

Server、Msql.DatabaseName等这是结构，您可以从这里更改数据库名称

 Public Structure Msql
        Shared datasource As String
        Shared IntSec As Boolean
        Shared username As String
        Shared password As String
        Shared DatabaseName As String
    End Structure

---

在配置文件和/或项目属性的设置页面上是否有L2S的连接字符串？如果是，那是什么？“Data Source=LAPTOP-AJM33RB1\TESTSERVER；Integrated Security=True；”这是代码中的连接字符串。我问你是在设置中还是在配置文件中有连接。你是说你有，而且是一样的，还是你没有回答我实际提出的问题。这是配置文件中的连接字符串什么是

DataSchool

？在哪里上课？