رعایت ترتیب در دیتابیس

[mamad20 18]

با سلام . کد زیر رو نوشتم ولی فقط آخرین رکورد دیتابیس رو اجرا میکنه . میخوام در مرحله اول رکورد اول و همینجور تا آخر انتخاب کنه ولی فقط آخری رو میاره همش .

sql1.Initialize(File.DirInternal,"gdb.db",False)
cur1 = sql1.ExecQuery("Select * from tbl_list")
For i = 0 To cur1.RowCount - 1
	cur1.Position = i
	adrs = cur1.GetString("img")
	adrs2 = cur1.GetString("answer")
Next
gpimage.SetBackgroundImage(LoadBitmap(File.DirAssets,adrs))
sword = adrs2

[mamad20 18]

سلام

مسلمه که فقط اخریو میاره

بقیه المان ها هم باید بذاری توی حلقه

این دو خط هم بذار توی حلقه، 

gpimage.SetBackgroundImage(LoadBitmap(File.DirAssets,adrs))
sword = adrs2

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

سلام . نباید بره تو حلقه . باید پوزیشن رو بهش میدادم که به جای i باید مینوشتم step -1 که نوشتم حل شد . تشکر

sql1.Initialize(File.DirInternal,"gdb.db",False)
cur1 = sql1.ExecQuery("Select * from tbl_list")
For i = 0 To cur1.RowCount - 1
	cur1.Position = step1-1
	adrs = cur1.GetString("img")
	adrs2 = cur1.GetString("answer")
Next
gpimage.SetBackgroundImage(LoadBitmap(File.DirAssets,adrs))
sword = adrs2

[shahab.es 5,429]

سلام

مسلمه که فقط اخریو میاره

بقیه المان ها هم باید بذاری توی حلقه

این دو خط هم بذار توی حلقه، 

gpimage.SetBackgroundImage(LoadBitmap(File.DirAssets,adrs))
sword = adrs2

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