passing text box value to SqlConnection

[پرستو پارسایی]

سلام من کانکشن استرینگ رو در یک تکست باکس نوشتم و SqlConnection رو در فرم لود از تکست باکس فراخوانی میکنم ولی موفق نبودم ممنون میشم دوستان بفرمایید را صحیح اینکار چیه سپاسگزارم.

"Data Source=.\SQLEXPRESS;AttachDbFilename=|DataDirector  y|\DB_ِDesign.mdf;Integrated Security=True;Connect Timeout=30;User Instance=True"

  Dim con As New SqlConnection(TextBox1.Text.ToString) 

       Dim cmd As New SqlCommand

        Dim da As New SqlDataAdapter

        Dim ds As New DataSet

        con.Open()