Necesito que me recomienden una grilla que tenga mas funcionalidades que un Datagrid!

[ManuNic]

con el mshflexgrid yo lo hago asi:
Private Sub flex1_DblClick()
flex1.col= 0 'codigo
form.txtcodigo = flex1.object
flex1.Col = 1 'Cantidad
form.TxtCant = flex1.object
flex1.Col = 3 'precio
form.TxtPrecio = flex1.object
xFila = flex1.RowSel
end sub