不會的就放這邊

Dim builder As New OleDbConnectionStringBuilder
builder.Provider = "Microsoft.Jet.OLEDB.4.0"
builder.DataSource = "|DataDirectory|\test.mdb"
builder.Add("Jet OLEDB:Database Password", "123456")
Dim str As String = builder.ConnectionString
Return str

Dim builder As New SqlConnectionStringBuilder
builder.DataSource = "(local)\SQLEXPRESS"
builder.InitialCatalog = "北風貿易"
builder.IntegratedSecurity = True
Dim str As String = builder.ConnectionString
Return str

Imports MySql.Data
Imports MySql.Data.MySqlClient

Public Class Form1
    Private Sub Form1_Load(ByVal sender As System.Object, _
    ByVal e As System.EventArgs) Handles MyBase.Load

        Dim builder As New MySqlConnectionStringBuilder
        builder.Server = "localhost"
        builder.UserID = "root"
        builder.Password = "123456"
        builder.Database = "test"
        Dim str As String = builder.ConnectionString

        Dim conn As New MySqlConnection(str)
        Dim commCMD As String = "select * from product"
        Dim da As New MySqlDataAdapter(commCMD, conn)
        Dim ds As New DataSet
        conn.Open()
        da.Fill(ds, "pro")
        DataGridView1.DataSource = ds.Tables("pro")
        conn.Close()
    End Sub
End Class

Me.SqlConnection1.ConnectionString = _
"Data Source=(local)\SQLEXPRESS; _
Initial Catalog=北風貿易; _
Integrated Security=True"