Anyone know why this won't work
 

--
Private Sub Frame1_Click()

With Me.Frame1

Sel = Sel + 1
If Sel = 5 Then Sel = 0
Me.Frame1.PictureAlignment = Sel
..ScrollBars = fmScrollBarsVertical
..ScrollHeight = .InsideHeight * 2.5
..ScrollWidth = .InsideWidth * 9
End With

Me.Repaint
Me.Label2.Caption = Me.Frame1.PictureAlignment & " " & Sel

End Sub
--
Only when Sel = 0 does the picture show, UNLESS I remove
the scrollbar stuff. I've spent all day trying different methods
and nothing works !

Can you only have a scroll bar if PictureAlignment = 0 ?

I've just though of that - is that why ? ?? !!!

Thanks - Kirk