سلام یک لیست ویو دارم که از دیتابیس اطلاعات رو در اون بازخانی کردم و گفتم به من همه کلمه های شروع شده با a رو نمایش بده حالا لیست ویوو بیش از 1000 خط شده و مشکل پیدا کردم در سرعت برنامه میخام بگم فقط 10 تای اولی که پیدا کردی رو نشون بده یعنی لیست ویو من فقط 10 تا خط داشته باشه ماکزیمم و دیگه نشون نده بقیه رو ؟ ممنون میشم در نوشتن دستور کمک کنید
این دستور که من نوشتم که همه رو نشون میده
lv1.Clear
Dim cur As Cursor
cur=sql1.ExecQuery("SELECT En,Fa FROM tbl WHERE En LIKE '"&EditText1.Text&"%'")
For i = 0 To cur.RowCount-1
' cur.Position=i
lv1.AddTwoLines(cur.GetString("En"),cur.GetString("Fa"))
Next
من اومدم دستور
For i = 0 To cur.RowCount-1
به شکل زیر عوض کردم و حالا لیست رو محدود میکنه ولی وقتی تعداد کمتر از 10 تا پیدا میکنه خطا میگیره نمیدونم اشکالش کجاس
سوال
arastooms 1,046
سلام
یک لیست ویو دارم که از دیتابیس اطلاعات رو در اون بازخانی کردم و گفتم به من همه کلمه های شروع شده با a رو نمایش بده
حالا لیست ویوو بیش از 1000 خط شده و مشکل پیدا کردم در سرعت برنامه
میخام بگم فقط 10 تای اولی که پیدا کردی رو نشون بده
یعنی لیست ویو من فقط 10 تا خط داشته باشه ماکزیمم و دیگه نشون نده بقیه رو ؟
ممنون میشم در نوشتن دستور کمک کنید
این دستور که من نوشتم که همه رو نشون میده
من اومدم دستور
به شکل زیر عوض کردم و حالا لیست رو محدود میکنه ولی وقتی تعداد کمتر از 10 تا پیدا میکنه خطا میگیره نمیدونم اشکالش کجاس
لینک ارسال
به اشتراک گذاری در سایت های دیگر
3 پاسخ به این سوال تاکنون داده شده است
ارسالهای توصیه شده
بایگانی شده
این موضوع بایگانی و قفل شده و دیگر امکان ارسال پاسخ نیست.