lutfen klasik SQL sorgularını kullanmak yerine Entitiy Framewok'e geçin

Yukarıdaki sorgunun entity hali şöyle olurdu.

Vb.net

Dim Idno As Integer = 2
Using Enti As New ABONEDBEntities
 Dim abone = (From a In Enti.ABONETB WHERE a.ID=Idno).FirstOrDefault()

If abone isnot Nothing Then
textbox.Text = abone.ID.ToString()
textbox1.Text = abo.ABONE_ADI
textbox2.Text = abo.ABONE_SOYADI
textbox3.Text = abo.ABONE_TELEFONU
textbox4.Text = abo.ABONE_IL
textbox5.Text = abo.ABONE_ILCE
textbox6.Text = abo.ABONE_KODU
Button.Enabled = True
End If
End Using