Hola los datos mas importantes de un control VScrollBar o de un control HScrollBar son:
value, min,max
*en Min debes de darle el valor minimo que quieras que tenga el height del form, cuando muevas la barra deslizante.
*en Max debes de darle el valor maximo que quieras que tenga el heignt del form, cuando muevas la barra deslizante.
*Despues solo tenemos que hacer que form1.height=VScroll1.value
dentro del evento VScroll1_Change()
*Tambien se puede poner la propiedad LargeChange que por defecto vale 1
y la propiedad SmallChange que tambien vale 1 por defecto , a 30 o asi para que el efecto de velocidad de estrecharse o agrandarse del formulario sea mas rapido, ya que con el valor que trae por defecto lo hace muy despacio.
EJEMPLO para que veas el efecto:
Dibuja un VScroll en una esquina del form y que el form tenga mas o menos
height-->3600 y width-->6000
dentro del formulario escribe el siguiente codigo:
'------------------------------------------------------------------------------------------------------------'
Private Sub Form_Load()
VScroll1.SmallChange = 30 'velocidad movimiento'
VScroll1.LargeChange = 30 'velocidad movimiento'
VScroll1.Max = 7000 'maximo agrandar'
VScroll1.Min = 3600 'minimo estrechar'
End Sub
Private Sub VScroll1_Change()
Form1.Height = VScroll1.Value
End Sub
'-----------------------------------------------------------------------------------------------------------'
Puedes cambiar los valores de SmallChange y LargeChange segun el efecto de rapidez de recogida del form o agrandar que quieras dar.
salu2