Visual Basic - Una Manita ,Colegas

hola colegas, tengo una cuestion entre manos, pasa lo sig.
alguien puede ayudarme con el manejo de archivos "WMF" ( Windows Meta File),
este lo tengo asociaso a un PictureBox , y fabuloso, pero el problema es cuando quiero darle ZOOM , alguien conoce una api o codigo , para poder agrandarle o minimizale ??? ,
comentarios y/o sugerencias BIENVENIDASSS !!!

Crea un form con 2 pictureBox y un vertical Scrollbar. ponelos en cualquier parte. lo unico que asegurate que el picture1 tenga como picture un wmf.

pegale este codigo al form y dale masa!!. suerte

Option Explicit
Dim W As Long, H As Long

Private Sub Form_Load()
W = Picture1.Picture.Width
H = Picture1.Picture.Height
End Sub

Private Sub Form_Resize()
Picture2.AutoRedraw = False
Picture1.Visible = False

Picture2.Move 30, 30, Me.ScaleWidth - 285 - 60, Me.ScaleHeight - 30

VScroll1.Min = 1
VScroll1.Max = 200
VScroll1.Value = 100

VScroll1.Move Me.ScaleWidth - VScroll1.Width - 30, 30, 285, Me.ScaleHeight - 60
VScroll1_Scroll
End Sub

Private Sub VScroll1_Scroll()
Dim Nx As Integer, Ny As Integer
Dim Nw As Integer, Nh As Integer
On Error Resume Next

Nw = W * VScroll1 / 100
Nh = H * VScroll1 / 100

Nx = (Picture2.Width - Nw) / 2
Ny = (Picture2.Height - Nh) / 2

Picture2.Cls
Picture2.PaintPicture Picture1.Picture, Nx, Ny, Nw, Nh
End Sub

Tambien funciona con bitmaps.....
Proba cambiando la propiedad redraw del picture2

MUCHAS GRACIAS JOSE ,
Saludos Desde Guatemala