关于mshflexgrid固定行的问题

大家好！我写了一个单据程序，因单据的列数太多，我想前面三列固定，以免好查看规格来对应后面的数量。程序用TEXT控件邦定MSHFLEXGRID来使用的。程序如下：Private Sub MSHFlexGrid1_Click()
MSHFlexGrid1.FixedCols = 1
If MSHFlexGrid1.Text = "" Then
Text2.Visible = True
Combo1.Visible = False
Text2.Left = MSHFlexGrid1.CellLeft + MSHFlexGrid1.Left
Text2.Top = MSHFlexGrid1.CellTop + MSHFlexGrid1.Top
Text2.Width = MSHFlexGrid1.CellWidth
Text2.Height = MSHFlexGrid1.CellHeight
Text2.SetFocus
Text2.Text = ""
Else
Text2.Visible = True
Combo1.Visible = False
Text2.Left = MSHFlexGrid1.CellLeft + MSHFlexGrid1.Left
Text2.Top = MSHFlexGrid1.CellTop + MSHFlexGrid1.Top
Text2.Width = MSHFlexGrid1.CellWidth
Text2.Height = MSHFlexGrid1.CellHeight
Text2.Text = MSHFlexGrid1.Text
End If
end sub


Private Sub MSHFlexGrid1_Scroll()
MSHFlexGrid1.FixedCols = 4
End Sub

现在是实现了当点击滚动条时前四行是固定了，可是滚动到后面时，点击MSHFLEXGRID里后面的格子时，TEXT他会自动弹到第一列的位置，不是我想要后面的位置，如我点第十列时，TEXT是出现在第一列，不是我想要的第十列，请高手帮忙看一下，谢了