数据窗口界面的问题
由于数据窗口很长,我想用上下箭头滚动界面,但按几下键数据窗口的界面就花了,怎么办哪!
if key=keydownarrow! then
tab_1.tabpage_1.dw_1.Object.DataWindow.VerticalScrollPosition=string(ii_arrowpos)
ii_arrowpos=ii_arrowpos + 10
end if
if key=keyuparrow! then
ii_arrowpos=ii_arrowpos - 10
tab_1.tabpage_1.dw_1.Object.DataWindow.VerticalScrollPosition=string(ii_arrowpos)
end if