مشکل در فراخوانی متن در دیتا بیس

[dr.mohammad 68]

سلا من از این کد برای فراخوانی استفاده می کنم ولی نتیجه ای حذصل نمیشه

cur = sql.ExecQuery("select * from bashgah where id = "&a)
	 
	 For i = 0 To cur.RowCount - 1 
	 	cur.Position = i
		
	 b = cur.GetString("noe")
	 If b = 1 Then
	 	RadioButton1.Checked = True
		Else If b = 2 Then
			RadioButton2.Checked = True
			Else If b = 3 Then
				RadioButton3.Checked = True
			End If
			
			EditText1.Text = cur.GetString("esm")
			EditText2.Text = cur.GetString("gh")
			EditText3.Text = cur.GetString("ghf")
			
			Next

ممنون

 

[mehrabmmp 528]

سلام

 

عزیزم باید تو کوچیک و بزرگ بودن حرف ها دقت داشته باشی

cur = sql.ExecQuery(SELECT * FROM bashgah WHERE id = "&a)

دقت کن ببین اسمی که  تو ناویکت دادی حروفشون با اینا مطابقت داشته باشه