1. Visual Studioで新規プロジェクトを開きます。
2. ［プロジェクト］メニューから ［新しい項目の追加］を選択します。
3. ［新しい項目の追加］ダイアログで［ActiveReports 9.0Jセクションレポート（コード）］を選択し、ファイル名前を「rptGroupUnboud」に変更します。
4. ［追加］ボタンをクリックします。

詳細は、「プロジェクトにレポートを追加する」を参照してください。

1. レポートの下部にあるグレーの領域をダブルクリックし、レポートのReportStartイベントのイベント処理メソッドを作成します。
2. ハンドラに次のコードを追加します。
   • データソースの接続文字列を設定する
   • データソースのSQLクエリを設定する
   • 接続を開いてデータリーダーからデータを取得する

   Visual Basic

   Visual Basicコード （ReportStartイベントの上に貼り付けます）	コードのコピー
   Dim connection As System.Data.OleDb.OleDbConnection Dim reader As System.Data.OleDb.OleDbDataReader

   Visual Basicコード （ReportStartイベント内に貼り付けます）

   コードのコピー

   'データ接続を作成し、必要に応じデータソースのパスを変更する Dim connectionString As String connectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\Program Files\ActiveReportsNET9\Data\Nwind.mdb" connection = New System.Data.OleDb.OleDbConnection(connectionString) connection.Open() Dim sqlString As String sqlString = "SELECT * FROM categories INNER JOIN products ON categories.categoryid= products.categoryid ORDER BY categories.CategoryID" Dim command As New System.Data.OleDb.OleDbCommand(sqlString, connection) 'データを取得する reader = command.ExecuteReader()

   C#

   C#コード （ReportStartイベントの上に貼り付けます）	コードのコピー
   private System.Data.OleDb.OleDbConnection connection; private System.Data.OleDb.OleDbDataReader reader;

   C#コード （ReportStartイベント内に貼り付けます）

   コードのコピー

   //データ接続を作成し、必要に応じデータソースのパスを変更する string connectionString = @"Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\Program Files\ActiveReportsNET9\Data\Nwind.mdb"; connection=new System.Data.OleDb.OleDbConnection(connectionString); connection.Open(); string sqlString = "SELECT * FROM categories INNER JOIN products ON categories.categoryid = products.categoryid ORDER BY categories.CategoryID"; System.Data.OleDb.OleDbCommand command = new System.Data.OleDb.OleDbCommand(sqlString, connection); //データを取得する reader = command.ExecuteReader();

1. レポートのデザイナ面を右クリックして、表示されるコンテキストメニューから［挿入］を選択して［グループヘッダ/フッタ］を選択し、GroupHeader/Footerセクションを追加します。
2. GroupHeaderセクションを選択し、［プロパティ］ウィンドウから以下のプロパティを設定します。 
   

   プロパティ名	値
   Name	ghCategories
   BackColor	Silver
   CanShrink	True
   DataField	CategoryID
   GroupKeepTogether	All
   KeepTogether	True

3. GroupFooterセクションを選択し、［プロパティ］ウィンドウからNameプロパティを「gfCategories」に変更します。
4. Detailセクションを選択し、［プロパティ］ウィンドウからCanShrinkプロパティを「True」に設定します。
5. ツールボックスからGroupHeaderセクションに以下のコントロールを追加し、［プロパティ］ウィンドウから以下のプロパティを設定します。

   TextBox1

   　　　　　

   プロパティ名	値
   DataField	CategoryName
   Name	txtCategoryName
   Text	カテゴリー名
   Location	0, 0 in
   Size	2, 0.2 in
   ForeColor	Blue
   BackColor	Silver
   Font Size	12
   Font Bold	True

   TextBox2

   プロパティ名	値
   DataField	Description
   Name	txtDescription
   Text	説明
   Location	0, 0.3 in
   Size	6, 0.2 in

   Label1

   　　　　

   プロパティ名	値
   Name	lblProductName
   Text	商品名
   Location	0, 0.6 in
   Font Bold	True

   Label2

   　　　　

   プロパティ名	値
   Name	lblUnitsInStock
   Text	在庫
   Location	4.4, 0.6 in
   Font Bold	True
   Alignment	Right

6. ツールボックスから、Detailセクションに［Textbox］コントロールを2つ追加し、［プロパティ］ウィンドウから以下のプロパティを設定します。

   TextBox1

   プロパティ名	値
   DataField	ProductName
   Name	txtProductName
   Text	商品名
   Location	0, 0 in
   Size	4, 0.2 in

   TextBox2

   プロパティ名	値
   DataField	UnitsInStock
   Name	txtUnitsInStock
   Text	在庫
   Location	4.4, 0 in
   Alignment	Right

7. ツールボックスから、GroupFooterセクションに以下のコントロールを追加して、プロパティウィンドウから以下のプロパティを設定します。

   Label

   プロパティ名	値
   DataField	TotalLabel
   Name	lblTotalLabel
   Location	2, 0 in
   Size	2.4, 0.2 in

   TextBox

   プロパティ名	値
   DataField	ProductName
   Name	txtTotalItems
   Text	全アイテム
   Location	4.4, 0 in
   SummaryType	SubTotal
   SummaryFunc	Count
   SummaryRunning	Group
   SummaryGroup	ghCategories
   Alignment	Right

   Line

   プロパティ名	値
   Name	Line1
   LineWeight	3
   X1	1.2
   X2	6.45
   Y1	0
   Y2	0

8. Page Headerセクションを右クリックして［削除］を選択します。

注意: FieldCollectionには、DataInitializeイベントまたはFetchDataイベントを使用してアクセスしてください。他のイベントからアクセスした場合、動作は保障されません。

Visual Basic

Fields.Add("CategoryID") 
Fields.Add("CategoryName") 
Fields.Add("ProductName") 
Fields.Add("UnitsInStock") 
Fields.Add("Description") 
Fields.Add("TotalLabel")

C#

Fields.Add("CategoryID");
Fields.Add("CategoryName");
Fields.Add("ProductName");
Fields.Add("UnitsInStock");
Fields.Add("Description");
Fields.Add("TotalLabel");

Visual Basic

Try
   reader.Read()
   Me.Fields("CategoryID").Value = reader("categories.CategoryID")
   Me.Fields("CategoryName").Value = reader("CategoryName")
   Me.Fields("ProductName").Value = reader("ProductName")
   Me.Fields("UnitsInStock").Value = reader("UnitsInStock")
   Me.Fields("Description").Value = reader("Description")
   Me.Fields("TotalLabel").Value = reader("CategoryName") + "の合計:"
   eArgs.EOF = False
Catch
   eArgs.EOF = True
End Try

C#

try
   {
      reader.Read();
      Fields["CategoryID"].Value = reader["categories.CategoryID"].ToString();
      Fields["CategoryName"].Value = reader["CategoryName"].ToString();
      Fields["ProductName"].Value = reader["ProductName"].ToString();
      Fields["UnitsInStock"].Value = reader["UnitsInStock"].ToString();
      Fields["Description"].Value = reader["Description"].ToString();
      Fields["TotalLabel"].Value = reader["CategoryName"].ToString() + "の合計:";
      eArgs.EOF = false;
   }
catch
   {
      eArgs.EOF = true;
   }

Visual Basic

reader.Close() 
connection.Close()

C#

reader.Close();
connection.Close();

• 設計時にレポートを表示するには、プレビュータブをクリックします。

または

• レポートをViewerコントロールで開きます。詳細は、「Windowsフォーム用のビューワの使用」を参照してください。