ScrollBar

ScrollBar

איך אני בודק ברגע שלוחתים עליו אם לחצו על הצד הימני או השמאלי בשביל לבצע פעולה אחרת? ב SCROLL או ב CHANGE ואם אפשר דוגמה קטנה ,אני רוצה להזיז לייבל לפי ה VALUE של הסקרולבאר ימינה או שמאלה ולא מצליח
 

פשוש2K

New member
תשווה לערך הקודם...

תשווה את הערך החדש שהתקבל לערך הקודם שהיה ותדע באיזה צד הקיש המשתמש. דוגמה: Dim old_value As Integer Private Sub Form_Load() old_value = HScroll1.Value End Sub Private Sub HScroll1_Change() If HScroll1.Value > old_value Then Label1.Caption = "Right" If HScroll1.Value < old_value Then Label1.Caption = "Left" old_value = HScroll1.Value End Sub
 
למעלה