怎么实现用按钮来控制MSHFlexGrid滚动条

如何实现用按钮来控制MSHFlexGrid滚动条?
MSHFlexGrid滚动条左右上下移动,能用按钮来实现控制吗?
Thanks!

[解决办法]

VB code

Private Sub Command1_Click() '右捲一列  If MSHFlexGrid1.LeftCol > 1 Then MSHFlexGrid1.LeftCol = MSHFlexGrid1.LeftCol - 1End SubPrivate Sub Command2_Click() '左捲一列  MSHFlexGrid1.LeftCol = MSHFlexGrid1.LeftCol + 1End SubPrivate Sub Command3_Click() '上捲一行  If MSHFlexGrid1.TopRow > 1 Then MSHFlexGrid1.TopRow = MSHFlexGrid1.TopRow - 1End SubPrivate Sub Command4_Click() '下捲一行  MSHFlexGrid1.TopRow = MSHFlexGrid1.TopRow + 1End Sub