mshflexgrid控件中的数据删除后再添加的问题？
在用一个mshflexgrid控件存放数据时，有两个按钮，一个是“增加”，一个是“删除”来控制对这个mshflexgrid的操作。
点击“增加”按钮，用mshflexgrid.textmatrix(i,j)="XXX"来写入数据，这里的“XXX”代表具体的内容。-----无错误，可以正常写入
如果继续点击“增加”（也就是说中间没有进行过“删除”removeitem i 操作），也可以加入全部数据。
问题是：如果两次“增加”之间有“删除”操作，则再次“增加”数据的时候，要增加数据的第一项总是不能在mshflexgrid中显示出来。比如要增加三行数据，则从第二行以后的才显示出来。
我做了测试，其实数据已经加到mshflexgrid中去了，可怎么没显示呢？
在网上找了资料，有的类似的情况说是没有打SP6补丁，可我打了补丁也没用。
请各位帮忙了！谢谢！
问题点数：80、回复次数：4Top
1 楼whachun（jakly）回复于 2006-06-05 10:51:24 得分 0
把你的代码帖出来，Top
2 楼Crystal0523（玉乖乖）回复于 2006-06-05 11:14:11 得分 0
"增加"：With frmPeople.mshClass
j = .rows
.rows = .rows + lstAdd.ListCount
For i = 0 To lstAdd.ListCount - 1
.TextMatrix(i + j, 0) = cmbYear.Text
.TextMatrix(i + j, 1) = lstAdd.List(i)
Next i
End With
“删除”：
With mshClass
For i = IIf(.Row <= .RowSel, .Row, .RowSel) To IIf(.Row > .RowSel, .Row, .RowSel)
If i = 0 Then
MsgBox "请选择班级进行删除", 0 + 64, "操作提示"
Exit Sub
End If
result = MsgBox("确定删除吗？", vbOKCancel)
If result = vbOK Then
.RemoveItem i
Else
Exit Sub
End If
Next i
End WithTop
3 楼Crystal0523（玉乖乖）回复于 2006-06-06 10:18:47 得分 0
上面的代码是不是写得不太清楚？
又试了几次，还是不行，是不是和控件本身有关呢？Top
4 楼Crystal0523（玉乖乖）回复于 2006-06-07 09:28:59 得分 0
这到底是个什么问题呢？Top
