

| Type | Description | |||
| Long | A Long expression that defines the identifier of the OLE event. |
Private Sub Grid1_UserEditorOleEvent(ByVal Object As Object, ByVal Ev As EXGRIDLibCtl.IOleEvent, CloseEditor As Boolean, ByVal Item As EXGRIDLibCtl.HITEM, ByVal ColIndex As Long)
If (Ev.ID = -602) Then ' KeyDown
Dim iKey As Long
iKey = Ev(0).Value
If iKey = vbKeyTab Then
With Grid1
CloseEditor = True
.FocusColumnIndex = .FocusColumnIndex + 1
.SearchColumnIndex = .FocusColumnIndex
End With
End If
End If