Public Sub Put( _
   ByVal key As Object, _
   ByVal action As Action _
) 

Dim instance As ActionMap
Dim key As Object
Dim action As Action
 
instance.Put(key, action)

public void Put( 
   object key,
   Action action
)

FarPoint.Win.Spread.Keystroke k = new FarPoint.Win.Spread.Keystroke(Keys.Enter, Keys.None);
Object obj = fpSpread1.GetInputMap(FarPoint.Win.Spread.InputMapMode.WhenAncestorOfFocused).Get(k);

int i;
FarPoint.Win.Spread.ActionMap map = fpSpread1.GetActionMap();
FarPoint.Win.Spread.Action act = map.Get(obj);
map.Put(k, act);
for (i = 0; i <= map.Keys.Length - 1; i++)
{
       listBox1.Items.Add(map.Keys(i).ToString());
}

Dim k As New FarPoint.Win.Spread.Keystroke(Keys.Enter, Keys.None)
Dim obj As Object = FpSpread1.GetInputMap(FarPoint.Win.Spread.InputMapMode.WhenAncestorOfFocused).Get(k)

Dim i As Integer
Dim map As FarPoint.Win.Spread.ActionMap = FpSpread1.GetActionMap()
Dim act As FarPoint.Win.Spread.Action = map.Get(obj)
map.Put(k, act)
For i = 0 To map.Keys.Length - 1
       ListBox1.Items.Add(map.Keys(i).ToString())
Next