VB + 2 个 MSHFLEXGRID左右进度条拉动问题
VB + 2 个 MSHFLEXGRID左右进度条拉动问题,想拉动表2的左右进度条的时候,表1相应也动
比如表1有20列,表2也是一模一样的20列,开始只显示1到10列,后面的看不到,当拉动表2的进度条(表2显示5到15列的时候,如果让表1也想应动起来(也显示5到15列)?)
[解决办法]
在scroll事件写代码,如:
Private Sub MSFlexGrid1_Scroll()
MSFlexGrid2.LeftCol = MSFlexGrid1.LeftCol
MSFlexGrid2.TopRow = MSFlexGrid1.TopRow
End Sub
Private Sub MSFlexGrid2_Scroll()
MSFlexGrid1.LeftCol = MSFlexGrid2.LeftCol
MSFlexGrid1.TopRow = MSFlexGrid2.TopRow
End Sub