关于MSHFLEXGRID点击的问题，高手快来~~~~~~~

Question

Adodc2.RecordSource = "select id as 编号, name as 城市, sheng as 省份 from sys_shi where sheng='" & TempSheng & "'"Adodc2.Refresh然后我点击MSHFLEXGRID的时候就错位了，总是想后挪一行，我点第4行的时候，显示的是第三行的数据！！求教~~~~~~~

Answer 1

然后我点击MSHFLEXGRID的时候就错位了。
’——————————————————————————————————-
1。将代点击部他代码贴出来。
2。我怀凝你用的是DATAGRID。而非MSHFLEXGRID。

Answer 2

存在两个MSHFLEXGRID，需要做联动，但是这是点击第一个表的代码，但是当数据库刷新以后第二个表的点击就不对了~~~
Private Sub MSHFlexGrid1_Click()
    Dim n As Integer
    On Error Resume Next
    n = MSHFlexGrid1.Row
    With Adodc1.Recordset
        .MoveFirst
        .Move (n - 1)
        FieldsID = .Fields("编号")
        Text1.Text = .Fields("省份")
        TempSheng = Text1.Text
        Adodc2.RecordSource = "select id as 编号, name as 城市, sheng as 省份 from sys_shi where sheng='" & TempSheng & "'"
        Adodc2.Refresh
    End With
    MSHFlexGrid1.ColWidth(0) = 2500
End Sub

Answer 3

当我点击第二个表的第二个数据时，显示是第一条记录，这是我第二个表的代码
Private Sub MSHFlexGrid2_Click()
    Dim n As Integer
    MSHFlexGrid2.Refresh
    On Error Resume Next
    n = MSHFlexGrid2.Row
    With Adodc2.Recordset
        .MoveFirst
        .Move (n - 1)
        FieldsID = .Fields("编号")
        Text2.Text = .Fields("城市")
    End With
    MSHFlexGrid2.ColWidth(0) = 2500
End Sub

Answer 4

MSHFlexGrid2.Refresh是不是应该放到Private Sub MSHFlexGrid1_Click()里面，这样才能同步显示啊