yousefi 0 ارسال شده در 30 اردیبهشت، ۱۳۹۷ اشتراک گذاری ارسال شده در 30 اردیبهشت، ۱۳۹۷ سلام در spinner یک دیتا بیس قرار دادم که هر کیس رشته ای بود ولی مقادریر متفاوتی دارند مثلا Select spinner2.SelectedIndex Case 0 paye=(sakht)*.9/1000 Case 1 paye=(sakht)*.27/1000 Case 2 paye=(sakht)*1.2/1000 Case 3 paye=(sakht)*.27/1000 Case 4 paye=(sakht)*.3/1000 Case 5 paye=(sakht)*.3/1000 end select حالا اگر بخواهم در یک eddit text آیتم های spinner جستجو کنم آیتم مورد جستجو در case=0 قرار میده و در نتیجه جواب نادرست میشه Sub Activity_Create(FirstTime As Boolean) Activity.LoadLayout("atash") If File.Exists(File.DirInternal,"atash.db")=False Then File.Copy(File.DirAssets,"atash.db",File.DirInternal,"atash.db") End If sql1.Initialize(File.DirInternal,"atash.db",True) cur=sql1.ExecQuery("select* from tblatash") For i=0 To cur.RowCount-1 cur.Position=i spinner2.Add(cur.GetString("name")) Next new ("") Sub new(q As String) Private condition As String q=q.Trim condition="WHERE name LIKE '%" & q & "%'" spinner2.Clear cur = sql1.ExecQuery("SELECT * FROM tblatash " & condition) For i = 0 To cur.RowCount - 1 cur.Position = i spinner2.add(cur.GetString("name")) Next end sub لطفا راهنمایی کنید لینک ارسال به اشتراک گذاری در سایت های دیگر تنظیمات بیشتر اشتراک گذاری ...
سوال
yousefi 0
سلام در spinner یک دیتا بیس قرار دادم که هر کیس رشته ای بود ولی مقادریر متفاوتی دارند مثلا
Select spinner2.SelectedIndex
Case 0
paye=(sakht)*.9/1000
Case 1
paye=(sakht)*.27/1000
Case 2
paye=(sakht)*1.2/1000
Case 3
paye=(sakht)*.27/1000
Case 4
paye=(sakht)*.3/1000
Case 5
paye=(sakht)*.3/1000
end select
حالا اگر بخواهم در یک eddit text آیتم های spinner جستجو کنم آیتم مورد جستجو در case=0 قرار میده و در نتیجه جواب نادرست میشه
Sub Activity_Create(FirstTime As Boolean)
Activity.LoadLayout("atash")
If File.Exists(File.DirInternal,"atash.db")=False Then
File.Copy(File.DirAssets,"atash.db",File.DirInternal,"atash.db")
End If
sql1.Initialize(File.DirInternal,"atash.db",True)
cur=sql1.ExecQuery("select* from tblatash")
For i=0 To cur.RowCount-1
cur.Position=i
spinner2.Add(cur.GetString("name"))
Next
new ("")
Sub new(q As String)
Private condition As String
q=q.Trim
condition="WHERE name LIKE '%" & q & "%'"
spinner2.Clear
cur = sql1.ExecQuery("SELECT * FROM tblatash " & condition)
For i = 0 To cur.RowCount - 1
cur.Position = i
spinner2.add(cur.GetString("name"))
Next
end sub
لطفا راهنمایی کنید
لینک ارسال
به اشتراک گذاری در سایت های دیگر
0 پاسخ به این سوال تاکنون داده شده است
ارسالهای توصیه شده
بایگانی شده
این موضوع بایگانی و قفل شده و دیگر امکان ارسال پاسخ نیست.