ارتباط Scroll با اسکرول بار وب بروزر

[oYaMaa]

بازم سلام...
دوستان چطور میشه با یه Scroll دیگه اسکرول بار وب بروزر رو مدیریت کرد؟
به این شکل که زمانی که اسکرول بار من در بالاترین وضعیت قرار داره، اسکرول بار وب بروزر یه کمی از بالا ترین وضعیتش فاصله داشته باشه؟
دقت کنید فقط بالا اینطور باشه و پاینش مطابق با اسکرول بار وب بروزر باشه
ممنون ...!

[محسن واژدی]

سلام علیکم
یک VScroll و WebBrower بر روی فرم قرار بدین و کد زیر را بررسی کنید:

Private Sub VScroll1_Scroll()
With WebBrowser1.Document
Call .parentWindow.scrollto(0, (VScroll1.Value * ((.body.scrollHeight - .body.clientHeight) - 50)) / VScroll1.Max)
End With
End Sub


البته در این کد همانطور که مشاهده میکنید، Max-VScroll کمی کمتر از مقدار اصلی است (-50) یعنی مقداری از بالاتری موقعیتش فاصله دارد، که در صورت لزوم این مقدار را حذف کنیم موقعیت اسکرول بار درست میشود

موفق باشید