Spread Windows Forms 13.0 Product Documentation
FarPoint.Win.Spread Assembly / FarPoint.Win.Spread.Model Namespace / DefaultSheetDataModel Class / GetCustomNameEnumerator Method
Example


In This Topic
    GetCustomNameEnumerator Method (DefaultSheetDataModel)
    In This Topic
    Gets an IEnumerator that enumerates through the names of the named expressions in the model.
    Syntax
    'Declaration
     
    Public Function GetCustomNameEnumerator() As IEnumerator
    'Usage
     
    Dim instance As DefaultSheetDataModel
    Dim value As IEnumerator
     
    value = instance.GetCustomNameEnumerator()
    public IEnumerator GetCustomNameEnumerator()

    Return Value

    IEnumerator object containing the enumerator for the custom name
    Example
    This example illustrates the use of this member by returning an IEnumerator that enumerates through the names of the named expressions in the model.
    FarPoint.Win.Spread.Model.DefaultSheetDataModel dataModel = new FarPoint.Win.Spread.Model.DefaultSheetDataModel(10, 10);
    dataModel.AddCustomName("TWICESUM", "2*SUM(A1,A2)", 1, 1);
    dataModel.AddCustomName("TwiceProduct", "2*A1*A2", 2, 2);
    dataModel.SetFormula(1, 1, "TWICESUM");
    dataModel.SetFormula(2, 2, "TwiceProduct");
    dataModel.SetValue(0, 0, 10);
    dataModel.SetValue(1, 0, 10);
    fpSpread1.ActiveSheet.Models.Data = dataModel;
    
    IEnumerator enm;
    enm = dataModel.GetCustomNameEnumerator();
    while (enm.MoveNext())
    {
    listBox1.Items.Add(enm.Current);
    }
    Dim dataModel As New FarPoint.Win.Spread.Model.DefaultSheetDataModel(10, 10)
    dataModel.AddCustomName("TWICESUM", "2*SUM(A1,A2)", 1, 1)
    dataModel.AddCustomName("TwiceProduct", "2*A1*A2", 2, 2)
    dataModel.SetFormula(1, 1, "TWICESUM")
    dataModel.SetFormula(2, 2, "TwiceProduct")
    dataModel.SetValue(0, 0, 10)
    dataModel.SetValue(1, 0, 10)
    FpSpread1.ActiveSheet.Models.Data = dataModel
    
    Dim enm As IEnumerator
    enm = dataModel.GetCustomNameEnumerator()
    While enm.MoveNext()
    ListBox1.Items.Add(enm.Current)
    End While
    See Also