Mostrar valores en textbox Vb.NET

[carlos79]

Buenas tardes amigos foristas :

Una consulta :

Tengo una consulta en mi aplicación, sin embargo, cuando deseo mostrar los resultados en mis dos textbox me da error....

El código es el siguiente :

Private Sub ComboBox1_SelectedIndexChanged1(ByVal sender As Object, ByVal e As System.EventArgs) Handles ComboBox1.SelectedIndexChanged
Dim ds As New DataSet
Dim da As New SqlClient.SqlDataAdapter

' Cuando pulsamos en un elemento de la lista...
With ComboBox1
TextBox11.Text = .GetItemText(.SelectedIndex)
End With

'Rutina
If Asc(e.KeyChar) = 13 Then

da = New SqlClient.SqlDataAdapter("select edo,direccion from proveedor where cod_prov='" & TextBox11.Text & "'", cs)
da.Fill(ds)
Me.TextBox3.Text = ds.Tables(0).Rows(0)("edo").ToString
Me.TextBox4.Text = ds.Tables(0).Rows(0)("direccion").ToString
TextBox3.Enabled = False
TextBox4.Enabled = False

End If
End Sub

Será que estoy omitiendo un paso ????

Muy agradecido por el acostumbrado apoyo que me puedan brindar.

Saludos

Carlos.