como puedo concatenar esta instruccion de sql en visual basic

[Aquaventus]

Hola elpaisa, una manera seria colocandolo esa instruccion a un txt y hacerle un ReadtoEnd y ejecutar la instruccion con la cadena devuelta. Y la otra manera que hacia para crear un procedure probablemente muy rudimentario seria asi... :

Código vb.net:

Sub crearProcedure7()
        Dim cnn As New SqlConnection("Server=" & cboInstancias.Text & "; database=" & txtBase.Text & "; integrated security=yes")
        Dim strSQL As String = "CREATE PROCEDURE modificar_paciente @cod nvarchar(10), @nom nvarchar(45), @pat nvarchar(45), @mat nvarchar(45), @ocu nvarchar(100), @dom nvarchar(250), @sex char(1), @fec nvarchar(10), @tel nvarchar(8), @cel nvarchar(9), @ale nvarchar(200), @enf nvarchar(200) as update paciente set nom_pac=@nom,pat_pac=@pat,mat_pac=@mat,ocu_pac=@ocu,dom_pac=@dom,sex_pac=@sex,fec_pac=@fec,tel_pac=@tel,cel_pac=@cel,ale_pac=@ale,enf_pac=@enf where cod_pac = @cod"
        Dim cmd As New SqlCommand(strSQL, cnn)
        cmd.CommandType = CommandType.Text
        Try
            cnn.Open()
            cmd.ExecuteNonQuery()
        Catch ex As SqlException
            MessageBox.Show(ex.ToString, "Clients")
        Finally
            cmd.Dispose()
            cnn.Close()
        End Try
    End Sub