VSFlexGrid控件里 值的变更？？？

[flakyxd]

如上图：
我如果在ID列里
把No3行的0003改成0001
那么No1行里的0001就会被赋空值
请问怎么解决？

[jhone99]

intTemp=3
.row
.col
strValue=.text

for i= 1 to 20
if i<>intTemp and .text<>strValue then

[king06]

不大明白,No1行里的0001怎么会被赋空值?是自动变的吗?
代码贴出来看看

[flakyxd]

自动变的
当我改变0003时，切改变后的值是0001，而0001在上面已经存在过了，所以要把上面已经存在0001清空。

[king06]

'若只编辑ID列,可以直接用col代替.ColIndex("ID")
Private Sub VSFlexGrid1_AfterEdit(ByVal Row As Long, ByVal Col As Long)
    Dim i As Long
    
    SendKeys "{ENTER}"
    
    With VSFlexGrid1
        For i = 0 To .Rows - 1
            If .Cell(flexcpText, Row, .ColIndex("ID")) = .Cell(flexcpText, i, .ColIndex("ID")) And i <> Row Then
                .Cell(flexcpText, i, .ColIndex("ID")) = ""
                Exit For
            End If
        Next
    End With
End Sub