Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
　　' データセットを作成します
　　Dim ds As New DataSet

　　Dim dtParent As DataTable
　　dtParent = ds.Tables.Add("Parent")
　　dtParent.Columns.Add("PA", GetType(Int32))
　　dtParent.Columns.Add("PB", GetType(String))
　　dtParent.Rows.Add(1, "PB1")
　　dtParent.Rows.Add(2, "PB2")

　　Dim dtChild As DataTable
　　dtChild = ds.Tables.Add("Child")
　　dtChild.Columns.Add("CA", GetType(Int32))
　　For i As Integer = 1 To 9
　　　　dtChild.Columns.Add(String.Format("C{0}", Chr(65 + i)), GetType(String))
　　Next
　　For i As Integer = 0 To 19
　　　　Dim dr As DataRow = dtChild.NewRow()
　　　　dr(0) = i Mod 2 + 1
　　　　For j As Integer = 1 To dtChild.Columns.Count - 1
　　　　　　dr(j) = String.Format("C{0}{1}", Chr(65 + j), i)
　　　　Next
　　　　dtChild.Rows.Add(dr)
　　Next

　　' テーブル間のリレーションを設定します
　　ds.Relations.Add("Relation1", dtParent.Columns("PA"), dtChild.Columns("CA"))

　　' 作成されたデータセットを接続します
　　FpSpread1.ActiveSheet.DataSource = ds
End Sub

Private Sub FpSpread1_ChildViewCreated(sender As Object, e As FarPoint.Win.Spread.ChildViewCreatedEventArgs) Handles FpSpread1.ChildViewCreated
　　' 固定列／行を設定します
　　e.SheetView.FrozenColumnCount = 1
　　e.SheetView.FrozenRowCount = 1
End Sub

private void Form1_Load(object sender, EventArgs e)
{
　　// データセットを作成します
　　DataSet ds = new DataSet();

　　DataTable dtParent;
　　dtParent = ds.Tables.Add("Parent");
　　dtParent.Columns.Add("PA", typeof(Int32));
　　dtParent.Columns.Add("PB", typeof(String));
　　dtParent.Rows.Add(1, "PB1");
　　dtParent.Rows.Add(2, "PB2");

　　DataTable dtChild;
　　dtChild = ds.Tables.Add("Child");
　　dtChild.Columns.Add("CA", typeof(Int32));
　　for (var i = 1; i < 10; i++)
　　{
　　　　dtChild.Columns.Add(String.Format("C{0}", (char)(65 + i)), typeof(String));
　　}
　　for (var i = 0; i < 20; i++)
　　{
　　　　DataRow dr = dtChild.NewRow();
　　　　dr[0] = i % 2 + 1;
　　　　for (var j = 1; j < dtChild.Columns.Count; j++)
　　　　{
　　　　　　dr[j] = String.Format("C{0}{1}", (char)(65 + j), i);
　　　　}
　　　　dtChild.Rows.Add(dr);
　　}

　　// テーブル間のリレーションを設定します
　　ds.Relations.Add("Relation1", dtParent.Columns["PA"], dtChild.Columns["CA"]);

　　// 作成されたデータセットを接続します
　　fpSpread1.ActiveSheet.DataSource = ds;
}

private void fpSpread1_ChildViewCreated(object sender, FarPoint.Win.Spread.ChildViewCreatedEventArgs e)
{
　　// 固定列／行を設定します
　　e.SheetView.FrozenColumnCount = 1;
　　e.SheetView.FrozenRowCount = 1;
}