SoloCodigo

hola....

bueno asi a vuelo de pajaro...
yo haria esto:

coloco un combobox y le coloco los numeros q estaran por defecto en pocentaje claro y le programo un select case donde evaluas el index del combobox.  osea para saber cual de los porcetajes escojistes

y despues escribes de la siguiente manera:

Label1.Font.Size = 20

por decir algo

de esa manera cambiarias el tamaño de la fuente que es lo que tu quieres. ok

saludos...
nos vemos...

En un formulario de prueba inserta:
- un control text, y con propiedad multiline=true
- un control slider, cargando en referencias el Microsoft Windows Common Control  6.0 (sp)
- un control combobox


Utiliza el siguiente codigo

Private Sub Combo1_Click()
If Combo1.ListIndex >= 0 Then
    Text1.FontSize = Combo1.ItemData(Combo1.ListIndex)
End If
End Sub

Private Sub Form_Load()
Text1.Text = "Coloca aqui todo el texto que deseas probar el Zoom"
Slider1.Orientation = ccOrientationVertical
Slider1.Height = Text1.Height
Slider1.Min = 5
Slider1.Max = 100
For i = 5 To 50
    Combo1.AddItem i
    Combo1.ItemData(Combo1.NewIndex) = i
Next i

End Sub

Private Sub Slider1_Scroll()
Text1.FontSize = Slider1.Value
End Sub