رفتن به مطلب
  • 0

سوال در مورد Scroll Position


حمید زارع

سوال

سلام 

من در ScrollChanged  این شرط را گذاشتم :

If Sv.ScrollPosition + Sv.Height = Sv.Panel.Height  Then

که در واقع وقتی اسکرول به آخر رسید دستور اجرا میشه

 

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

 

دوستان راهنمایی بفرمایید ...

لینک ارسال
به اشتراک گذاری در سایت های دیگر

6 پاسخ به این سوال تاکنون داده شده است

ارسال های توصیه شده

سلام کدتونو به اینصورت قرار بدید این کد قبل از اینکه اسکرول به انتها برسه یه toast message میده...

If Sv.ScrollPosition + Sv.Height <= Sv.Panel.Height Then
ToastMessageShow("salam",False)
End If
لینک ارسال
به اشتراک گذاری در سایت های دیگر

ممنون

 

ولی اینکه به محض اسکرول شدن کد اجرا میشه ...

 

من چون به دیتابیسم لیمیت دادم و در مولتی پنل لود می کنم میخام کمی مونده که اسکرول به انتها برسه این کد اجرا بشه که که کاربر وقفه ای در هنگام اسکرول کردن حس نکنه ...

لینک ارسال
به اشتراک گذاری در سایت های دیگر

سلام

اینو یه تست بزنید 

If (Sv.ScrollPosition + Sv.Height) - 20 = Sv.Panel.Height  Then
لینک ارسال
به اشتراک گذاری در سایت های دیگر

 

سلام

اینو یه تست بزنید 

If (Sv.ScrollPosition + Sv.Height) - 20 = Sv.Panel.Height  Then

 

سلام

 

نه قبلاً تست کردم

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

لینک ارسال
به اشتراک گذاری در سایت های دیگر

سلام.

این کد کاملا درسته

If (Sv.ScrollPosition + Sv.Height) - 20 = Sv.Panel.Height  Then

اما چون اسکرول از اون قسمت میگذره کد اجرا نمیشه.

شما باید به این صورت کد رو بنویسید تا اجرا شه.

sub globals:
dim str as string="."
''''''''''''''''''''''''''
If (Sv.ScrollPosition + Sv.Height) - 20 = Sv.Panel.Height  Then
if str="." then
str="//"
codi ke mikhay ejra she
str="."
end if 
end if

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

موفق باشی

لینک ارسال
به اشتراک گذاری در سایت های دیگر

بایگانی شده

این موضوع بایگانی و قفل شده و دیگر امکان ارسال پاسخ نیست.

مهمان
این موضوع برای عدم ارسال قفل گردیده است.
  • کاربران آنلاین در این صفحه   0 کاربر

    • هیچ کاربر عضوی،در حال مشاهده این صفحه نیست.
×
×
  • اضافه کردن...