COLEGIO MARRUECOS Y MOLINOS Prof Carlos Mario Montes

COLEGIO MARRUECOS Y MOLINOS Prof. Carlos Mario Montes 2 3 1. Abra un proyecto nuevo. 2. Cambie el nombre del proyecto y el formulario (nombre) en la lista de propiedades. En este caso el proyecto se llama TUTORIAL y el formulario se llama UTILIZACIÓN DEL OBJETO SCROLLBAR. 3. En las propiedades de los HScroll (barras horizontales) coloque como mínimo Min 0 y como máximo Max 255 (mayor número en la configuración de colores). En la misma ventana de propiedades elija el intervalo de cambio Small. Change 1, puesto que sólo se trabajara con valores enteros.

COLEGIO MARRUECOS Y MOLINOS Prof. Carlos Mario Montes 1 2 1 1. Cree un objeto shape y cámbiele las propiedades: Back. Color, Back. Style=opaque(para que pueda tomar los colores que usted quiera), shape (elija la figura que quiera). 2. Cree 2 VScroll (barras verticales) una para variar el tamaño y otra para variar la forma de shape. Las propiedades de la barra para la FORMA deben ser Min=0 y Max=5 (puesto que la propiedad shape del objeto shape 1 varia entre 0 y 5) y la propiedad Small. Change=1. Para la barra del tamaño del shape elija los valores que usted considere adecuados.

COLEGIO MARRUECOS Y MOLINOS Prof. Carlos Mario Montes Private Sub Form_Load() Shape 1. Shape = VScroll 2 Shape 1. Height = VScroll 1 Shape 1. Width = HScroll 4 End Sub Private Sub HScroll 1_Change() Shape 1. Back. Color = RGB(HScroll 1, HScroll 2, HScroll 3) End Sub Private Sub HScroll 2_Change() Shape 1. Back. Color = RGB(HScroll 1, HScroll 2, HScroll 3) End Sub Private Sub HScroll 3_Change() Shape 1. Back. Color = RGB(HScroll 1, HScroll 2, HScroll 3) End Sub Private Sub HScroll 4_Change() Shape 1. Width = HScroll 4 End Sub Private Sub VScroll 1_Change() Shape 1. Height = VScroll 1 End Sub Private Sub VScroll 2_Change() Shape 1. Shape = VScroll 2 End Sub