vsflexgrid的问题

[jilong4]

按下"del"删除当前选中的行,请问怎么实现?

[cansum396]

捕获del的键值
然后用vsflexgrid的remove事件删除此行
很久没用VB了
不过流程应该是这样的

[jilong4]

谁能给我代码?

[maifans]

Private Sub VSFlexGrid1_KeyDown(KeyCode As Integer, Shift As Integer)
If VSFlexGrid1.Rows > 1 Then
If KeyCode = 46 Then
VSFlexGrid1.RemoveItem VSFlexGrid1.Row
End If
End If
End Sub