Visual Basic, .NET, ASP, VBA, VBScript
 
  Библиотека кодов  
  Дополнительные элементы >>> Slider  
     
  Описание элемента Slider  
  Элемент Slider устанавливает значение некоторой величины, перемещая бегунок между минимальным и максимальным значением. Пользоваться данным элементом очень просто. Вы устанавливаете минимальное/максимальное значение, а также устанавливаете значения свойств элемента SmallChange (минимальное приращение значения) и LargeChange (большое приращение значения).

Пример: создайте новый проект, разместите на нем элемент Slider и 2 элемента Label. Вставьте следующий код:

Private Sub Form_Load()
With Slider1
.Width = 4000
.Max = 30
.SmallChange = 3
.LargeChange = 6
End With
End Sub
Private Sub Slider1_Change()
Label2.Caption = Slider1.Value
End Sub
Private Sub Slider1_Scroll()
Label1.Caption = Slider1.Value
End Sub

Перемещая ползунок с помощью мыши, вы перемещаетесь ровно по одному делению. Кликая мышкой слева/справа от ползунка, вы перемещаетесь на столько делений, сколько указано свойством LargeChange. В нашем случае это 6. Если вы нажмете на клавиатуре на кнопки перемещения курсора (4 серых кнопочки со стрелками), то можете наблюдать перемещение ползунка элемента Slider на количество позиций, заданных свойством SmallChange, т.е. на 3 позиции.

Как вы заметили, когда вы перемещаете ползунок с помощью мыши, значение элемента Label2 не меняется. Это связяно с тем, что событие элемента Slider Change - событие единичное. Оно возникает, когда пользователь отпускает кнопку мыши. Событие же Scroll происходит непрерывном при перемещении бегунка.


 
     
  VBNet online (всего: 51566)  
 

Логин:

Пароль:

Регистрация, забыли пароль?


В чате сейчас человек
 
     
  VBNet рекомендует  
   
     
  Лучшие материалы  
 
ActiveX контролы (112)
Hitman74_Library (36119)
WindowsXPControls (20739)
FlexGridPlus (19374)
DSMAniGifControl (18295)
FreeButton (15157)
Примеры кода (546)
Parol (18027)
Passworder (9299)
Screen saver (7654)
Kerish AI (5817)
Folder_L (5768)
Статьи по VB (136)
Мое второе впечатление... (11236)
VB .NET: дорога в будущее (11161)
Основы SQL (9225)
Сообщения Windows в Vi... (8788)
Классовая теория прогр... (8619)
 
     
Техническая поддержка MTW-хостинг | © Copyright 2002-2011 VBNet.RU | Пишите нам