Public Const CollapseImage As Integer

Dim value As Integer
 
value = SpreadView.CollapseImage

public const int CollapseImage

System.Data.DataSet ds = new System.Data.DataSet();
DataTable name; 
DataTable city; 
name = ds.Tables.Add("Customers"); 
name.Columns.AddRange(new DataColumn[] {new DataColumn("LastName", typeof(string)), new DataColumn("FirstName", typeof(string)),
new DataColumn("ID", typeof(Int32))}); 
name.Rows.Add(new object[] {"Fielding", "William", 0}); 
name.Rows.Add(new object[] {"Williams", "Arthur", 1}); 
name.Rows.Add(new object[] {"Zuchini", "Theodore", 2}); 
city = ds.Tables.Add("City/State"); 
city.Columns.AddRange(new DataColumn[] {new DataColumn("City", typeof(string)), new DataColumn("Owner", typeof(Int32)), new
DataColumn("State", typeof(string))}); 
city.Rows.Add(new object[] {"Atlanta", 0, "Georgia"}); 
city.Rows.Add(new object[] {"Boston", 1, "Mass."}); 
city.Rows.Add(new object[] {"Tampa", 2, "Fla."}); 
ds.Relations.Add("City/State", name.Columns["ID"], city.Columns["Owner"]); 

FarPoint.Win.Spread.SpreadView wrkbk = fpSpread1.GetRootWorkbook();

fpSpread1.DataSource = ds;

wrkbk.SetImage(wrkbk.ExpandImage, Image.FromFile("D:\\expand-ena.bmp"));
wrkbk.SetImage(wrkbk.ExpandImageDisabled, Image.FromFile("D:\\expand-dis.bmp"));
wrkbk.SetImage(wrkbk.CollapseImage, Image.FromFile("D:\\collapse-ena.bmp"));
wrkbk.SetImage(wrkbk.CollapseImageDisabled, Image.FromFile("D:\\collapse-dis.bmp"));

Dim ds As New System.Data.DataSet
Dim name As DataTable
Dim city As DataTable
name = ds.Tables.Add("Customers")
name.Columns.AddRange(New DataColumn() {New DataColumn("LastName", Type.GetType("System.String")), New DataColumn("FirstName",
Type.GetType("System.String")), New DataColumn("ID", Type.GetType("System.Int32"))})
name.Rows.Add(New Object() {"Fielding", "William", 0})
name.Rows.Add(New Object() {"Williams", "Arthur", 1})
name.Rows.Add(New Object() {"Zuchini", "Theodore", 2})
city = ds.Tables.Add("City/State")
city.Columns.AddRange(New DataColumn() {New DataColumn("City", Type.GetType("System.String")), New DataColumn("Owner", Type.GetType("System.Int32")),
New DataColumn("State", Type.GetType("System.String"))})
city.Rows.Add(New Object() {"Atlanta", 0, "Georgia"})
city.Rows.Add(New Object() {"Boston", 1, "Mass."})
city.Rows.Add(New Object() {"Tampa", 2, "Fla."})
ds.Relations.Add("City/State", name.Columns("ID"), city.Columns("Owner"))

Dim wrkbk As FarPoint.Win.Spread.SpreadView = FpSpread1.GetRootWorkbook()

FpSpread1.DataSource = ds

wrkbk.SetImage(FarPoint.Win.Spread.SpreadView.ExpandImage, Image.FromFile("D:\expand-ena.bmp"))
wrkbk.SetImage(FarPoint.Win.Spread.SpreadView.ExpandImageDisabled, Image.FromFile("D:\expand-dis.bmp"))
wrkbk.SetImage(FarPoint.Win.Spread.SpreadView.CollapseImage, Image.FromFile("D:\collapse-ena.bmp"))
wrkbk.SetImage(FarPoint.Win.Spread.SpreadView.CollapseImageDisabled, Image.FromFile("D:\collapse-dis.bmp"))