System.Collections.IEnumerator se;
fpSpread1.ActiveSheet.AddCustomName("TwiceSum", "2*SUM(A1,A2)", 1, 1);
fpSpread1.ActiveSheet.AddCustomName("TwiceProduct", "2*A1*A2", 2, 2);
fpSpread1.ActiveSheet.SetFormula(1, 1, "TwiceSum");
fpSpread1.ActiveSheet.SetFormula(2, 2, "TwiceProduct");
fpSpread1.ActiveSheet.SetValue(0, 0, 10);
fpSpread1.ActiveSheet.SetValue(1, 0, 10);
se = fpSpread1.ActiveSheet.GetCustomNameEnumerator();
listBox1.Items.AddRange(new Object[] {se.MoveNext().ToString(), se.Current.ToString(), se.MoveNext().ToString(), se.Current.ToString()});
Dim se As System.Collections.IEnumerator
FpSpread1.ActiveSheet.AddCustomName("TwiceSum", "2*SUM(A1,A2)", 1, 1)
FpSpread1.ActiveSheet.AddCustomName("TwiceProduct", "2*A1*A2", 2, 2)
FpSpread1.ActiveSheet.SetFormula(1, 1, "TwiceSum")
FpSpread1.ActiveSheet.SetFormula(2, 2, "TwiceProduct")
FpSpread1.ActiveSheet.SetValue(0, 0, 10)
FpSpread1.ActiveSheet.SetValue(1, 0, 10)
se = FpSpread1.ActiveSheet.GetCustomNameEnumerator()
ListBox1.Items.AddRange(New Object() {se.MoveNext().ToString(), se.Current().ToString(), se.MoveNext().ToString(), se.Current().ToString()})