[VB.NET] Fare una SELECT di ricerca con TextBox

[juro]

Giorno a tutti
qualcuno mi puo correggere questo pezzo di codice?
allora ho una tabella gruppi


codice descrizione
1 hardware
2 software
3 arredo
4 impianti

vorrei che quando metto il codice in una text mi compaia automaticamente la descrizione nella text2
metto il codice che ho fatto io

Dim con2 As New SqlConnection
Dim comand2 As New SqlCommand
Dim data2 As New DataSet
Dim adapter2 As New SqlDataAdapter
con2 = New SqlConnection(System.Configuration.ConfigurationSe ttings.AppSettings.Get("ConnectionString"))
comand2 = New SqlCommand
con2.Open()
comand2.Connection = con2
adapter2 = New SqlDataAdapter("SELECT desc_grup FROM gruppi WHERE cod_grup = ('" + TextBox1.Text + "')", con2)
Try
data2.Clear()
adapter.Fill(data2, "gruppi")
TextBox2.DataBindings.Add("text", data2, "gruppi.desc_grup")
TextBox1.DataBindings.Add("text", data2, "gruppi.cod_grup")





Catch ex As Exception

End Try


qualcuno mi sa dire cosa sbaglio e come posso fare?
grazie

[Brainjar]

Due cose:
1) Utilizza i tags CODE, altrimenti il tuo codice è illegibile.
2) Casa fai con questa istruzione ?

con2 = New SqlConnection(System.Configuration.ConfigurationSettings.AppSettings.Get("ConnectionString"))

Perchè non apri la connessione passando parametri reali?

    ' Esempio : 
    Dim connectionString As String
    connectionString =  "data source=myserver"
    connectionString &= ";initial catalog=northwind"
    connectionString &= ";user id=" & userid
    connectionString &= ";password=" & password
    SqlConnection1.ConnectionString = connectionString
    SqlConnection1.Open()

[juro]

con2 = New SqlConnection(System.Configuration.ConfigurationSe ttings.AppSettings.Get("ConnectionString"))


ho creato un file app.config
con cui mi connetto al server e al dbase
cmq per quello funziona
cosi posso andare a cambiare il parametro indirizzo ip comevoglio
anche se nn e questo il problema