جستجو در جایی که به وسیله Spinner انتخاب شده

[omid1377 44]

سلام دوستان

من مثلا یه آیتم هایی رو از لیست ویو مثلا حرف ب رو فراخانی می کنم

یه این صورت

Sub Spinner2_ItemClick (Position As Int, Value As Object)

Dim cur As Cursor
	ListView1.Clear
	cur = sql1.ExecQuery("SELECT * FROM moin_table WHERE type = "&Position)
	For i = 0 To cur.RowCount-1
		cur.Position = i
		ListView1.AddSingleLine2(cur.GetString("word"),cur.GetInt("id"))
	Next
	cur.Close
	

End Sub

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

Sub EditText1_TextChanged (Old As String, New As String)
	Dim cursur1 As Cursor

	cursur1 =  sql1.ExecQuery("SELECT * FROM moin_table WHERE word LIKE '%"&EditText1.Text&"%' ")
	ListView1.Clear 
	For i = 0 To cursur1.RowCount-1
		cursur1.Position = i
		ListView1.AddSingleLine2(cursur1.GetString("word"),cursur1.GetInt("id"))
	Next
	cursur1.Close
End Sub

میخوام فقط در بین جاهایی جستجو انجام بشه که به وسیله ی Spinner انتخاب شده نه در کل دیتابیس

چیکار کنم؟

[مهران محمودی 778]

درود،

با این فرض که type در جدولتون برابر با ایندکس آیتم انتخاب شده در spinner  هستش (قسمت اول کدهاتون که گذاشتید):

cursur1 =  sql1.ExecQuery("SELECT * FROM moin_table WHERE type="&Spinner2.SelectedIndex&" AND word LIKE '%"&EditText1.Text&"%' ")

کوئری خودتون رو به این شکل اجرا کنید   

بنظر باید درست بشه.