keypreview=.t. &&to definition form class at top code >>
>PROCEDURE KEYPRESS >LPARAMETERS nKeyCode, nShiftAltCtrl >local m.n >m.n=300 &&to set here the wanted value >if nkeycode=5 &&up arrow >For i=1 To m.n >thisform.sbscrollcontainer1.scrollbarvertical1.Scrollendup1.Sbshape4.Click >Endfor >endi Hi, I am sorry, this code does not work, I suppose it is meant for an other class than the ARG SBcont.VCX. There are no such properties like scrollbarvertical1.scrollendup1 in this class. The position of the __vscrollbar container are monitored differently. Regards, Koen > >if nkeycode=24 &&down arrow >For i=1 To m.n >thisform.sbscrollcontainer1.scrollbarvertical1.Scrollenddown1.Sbshape4.Click >endfor >endi >endproc > >