object 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"]);
FpSpread1.DataSource = ds;
FpSpread1.Sheets[0].ClickHeaderCellToExpand = true;
Dim ds = 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", GetType(String)), New DataColumn("FirstName", GetType(String)),
New DataColumn("ID", GetType(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", GetType(String)), New DataColumn("Owner", GetType(Int32)),
New DataColumn("State", GetType(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"))
FpSpread1.DataSource = ds
FpSpread1.Sheets(0).ClickHeaderCellToExpand = True