Overloads Sub AddModelScopeCustomName( _
   ByVal name As String, _
   ByVal value As Expression, _
   ByVal comment As String _
) 

Dim instance As IEnhancedCustomNameSupport
Dim name As String
Dim value As Expression
Dim comment As String
 
instance.AddModelScopeCustomName(name, value, comment)

void AddModelScopeCustomName( 
   string name,
   Expression value,
   string comment
)

FarPoint.Win.Spread.Model.IEnhancedCustomNameSupport cns;
FarPoint.CalcEngine.Expression ex;
cns = (FarPoint.Win.Spread.Model.IEnhancedCustomNameSupport)fpSpread1.ActiveSheet.Models.Data;
cns.AddModelScopeCustomName("ALPHA", new FarPoint.CalcEngine.DoubleExpression(20), "test");
fpSpread1.ActiveSheet.SetFormula(1, 1, "ALPHA");
ex = cns.GetModelScopeCustomName("ALPHA");
listBox1.Items.Add("The type of the custom name is " + ex.ToString());

Dim cns As FarPoint.Win.Spread.Model.IEnhancedCustomNameSupport
Dim ex As FarPoint.CalcEngine.Expression
cns = FpSpread1.ActiveSheet.Models.Data
cns.AddModelScopeCustomName("ALPHA", New FarPoint.CalcEngine.DoubleExpression(20), "test")
FpSpread1.ActiveSheet.SetFormula(1, 1, "ALPHA")
ex = cns.GetModelScopeCustomName("ALPHA")
ListBox1.Items.Add("The type of the custom name is " & ex.ToString())