Visual Basic - ZOOM VENTANA FORMULARIO VB.

NECESITO SABER CODIGO PARA QUE UNA VENTANA-FORMULARIO DE VB, SE HAGA GRANDE O PEQUEÑA MEDIANTE UN SCROLLBAR.

JUAN LO ACABO DE HACER Y ME FUNCIONA TE MANDO EL CODIGO

Option Explicit
Dim alto As Integer
Dim ancho As Integer
Dim valor As Integer

Private Sub Form_Load()
alto = Form1.Height
ancho = Form1.Width
End Sub

Sub formulario()

Form1.Height = alto + (valor * 100)
Form1.Width = ancho + (valor * 100)

End Sub

Private Sub HScroll1_Change()

valor = HScroll1.Value - 4
formulario

End Sub

LAS PROPIEDADES DEL HSB SON LARGECHANGE Y SMALLCHANGE=1
MAX=10 , MIN=0 , VALUE =5

SALUDOS DE DOMINGO