Sección de tutoriales y manuales vb

Control Slider

Volver al índice

Guía con ejemplos del uso del control Slider de vb



 

 

 

 

 

 

 

 

1 - Descripción del control Slider

Este control de Visual basic permite mediante un deslizador, seleccionar un valor, de un rango de valores que tiene establecidos el control .

También visualiza unas líneas o marcas llamada Tics.

Esta es una vista del mismo:

 

 

Windows utiliza un control de este tipo en varias opciones, por ejemplo para cambiar la resolución de la pantalla, en la pestaña configuración., también en la ventana de propiedades de dispositivos de Sonido y audio y muchas otras.

 

vista dos de alguna de los controles slider utilizados por windows en el sistema

 

 

Agregar el control al proyecto

 

El mismo se encuentra en el conjunto de ocx Microsoft Windows Common Controls 6.0, que también trae los controles ListView, ProgressBar, ImageList, ToolBar, TreeView, ImageCombo , StatusBar y TabStrip

Para agregarlo al proyecto se debe hacerlo desde el menú Proyecto - Componentes, como se ve en el siguiente gráfico.

 

Vista de la ventana para añadir componentes a vb

 

 


2 - Propiedades del control Slider

 

Las principales propiedades son:

 

 

 


3 - Propiedad Value , Max y Min

Un ejemplo para especificar estas propiedades en tiempo de ejecución:

 

Private Sub Form_Load()
With Slider1
     
     .Max = 25
     .Min = 5
     .Value = 10
End With
End Sub 

 

El control visualizará de la siguiente manera:

 

 

Para especificarlas en tiempo de diseño la propiedad Max y Min, como también las principales, se puede realizar desde la opción Personalizado, haciendo click derecho en el control.

 

Vista de la página de propiedades:

vista de la ventana para configurar las opciones del control

 

Nota: La propiedad Max no puede ser inferior a la propiedad Min establecida, como tampoco la propiedad Min ser mayor a la propiedad Max, ya que dará un error 380 " el valor de la propiedad no es válido ".

 


4 - Propiedades relacionadas a la apariencia del control

Propiedad Orientation:

 

Esta propiedad permite colocar el Slider en forma Vertical y también en forma Horizontal ( la utilizada por defecto ) :

Para la primera :

 

El_Slider1.Orientation = ccOrientationVertical

 

vista del slider en forma vertical

 

Horizontal:

 

El_Slider1.Orientation = ccOrientationHorizontal

 

 

Propiedad TickStyle:

 

La misma determina el lugar en donde colocar los Tics o marcas del slider y tiene cuatro posibles valores: Arriba, abajo, ambos, o sin Tics:

 

vista de la apariencia del control modificando la propiedad tickstyle

 

Nota: Se visualizará de la forma anterior, si la propiedad Orientation está en horizontal, si está en vertical será izquierda y derecha

 

Propiedad textPosition:

 

La misma determina donde visualizar la información de la propiedad value al deslizar el Slider, puede ser arriba o abajo si está en forma Horizontal, e izquierda derecha si está en forma vertical:

 

Vista de TextPosition 1

Vista de TextPosition 2

 

La otra propiedad relacionada a la apariencia se llama TickFrequency , y se utiliza para indicar cuantas marcas o tics mostrará. Por defecto TickFrequency está establecida en 1

Por ejemplo, si el Slider tiene como Min 0, Max 50, el control visualizará todos los Tics, es decir 50 ( ..en realidad son 51 ya que toma también el 0 )

 

vista 1 de la rpopiedad TickFrequency

 

Si tiene como Min 0, Max 50, y TickFrequency un 10, de esta otra:

 

vista 2 de TickFrequency

 

 


5 - Eventos del Slider

 

Los eventos que dispone son los que posee la mayoría de los controles, Click, GotFocus, LostFocus, KeyDown, KeyUp, KeyPress, MouseDown, MouseMove etc..

También pose otros dos, llamados Scroll y Change.

El evento Scroll se produce cada ves que se desplaza el cursor ( el deslizante ) , el evento change cada ves que la propiedad Value cambie de valor.

 


6 - Ejemplo

El siguiente ejemplo, al cambiar el valor del Slider cambia el ancho del formulario. El código se coloca en el evento Change. Como propiedad Max se establece en 600, y como Min 100. Es decir al mover el deslizador, se podrá cambiar el ancho entre un rango de 100 y 600 pixeles.

 

Private Sub Form_Load()

With Slider1
     .Max = 600
     .Min = 100
     .Value = 300
End With

End Sub

Private Sub Slider1_Change()
Me.Width = Slider1.Value * Screen.TwipsPerPixelX
End Sub

 

7 -Recursos visual basic 6.0 - Enlaces

 

Recursos VB.NET - Enlaces

 

 


Buscar en Recursos vb