Need to exceed vertical scroll bar max allowed height
Posted on 2004-11-08
I have a picture control within a picture control. Next to the outside picture control I have a invisible vertical scroll bar. On the inner picture control I have a control array. The control array grows vertically, increasing the height of the inner picture control as needed. When the height of the inner picture control exceeds the height of the outer picture control, the vertical scroll bar is made visible and is used to scroll the inner picture control.
I use the height properties of the picture controls to set the min and max propeties of the vertical scroll bar:
verScroll.Min = 0
verScroll.Max = picInside.Height - picOutside.Height
This works great, except when verScroll.Max exceeds 32767! The control array items listed below are there, just not accessible by the scroll bar. Does anyone know how I can reach these other items? Does anyone know a work around? I'll consider using other controls if anyone has a different approach.
In case you're wondering, this is how I get the inner picture control and vertical scroll bar to work together:
Private Sub verScroll_Change()
picInside.Top = -verScroll.Value