チュートリアル : オブジェクトのデータへの接続
更新 : 2007 年 11 月
このチュートリアルでは、顧客データと注文データを格納するオブジェクトを作成し、それを基にオブジェクト データ ソースを作成する方法について説明します。オブジェクト データ ソースは、[データ ソース] ウィンドウに表示されます。このウィンドウでは、項目をフォームにドラッグすると、オブジェクトのパブリック プロパティのデータにバインドされたコントロールが作成されます。このチュートリアルでは、TableAdapter を使ってデータをデータベースからフェッチし、オブジェクトに設定する方法についても説明します。
データ ソース構成ウィザードを実行し、データ ソースの型として [オブジェクト] を選択すると、オブジェクト データ ソースが作成されます。データ ソース構成ウィザードを完了すると、[データ ソース] ウィンドウでオブジェクトのパブリック プロパティをフォームにドラッグできるようになります。
メモ : |
---|
データ ソース構成ウィザードにオブジェクトを表示するために、オブジェクトが含まれるプロジェクトを作成する必要があります。オブジェクトがこのウィザードで使用できる状態にない場合は、目的のオブジェクトを含むプロジェクトを再作成します。 |
このチュートリアルでは、以下のタスクを行います。
新しい Windows アプリケーション プロジェクトを作成します。
顧客と注文を表すサンプル オブジェクトを作成します。
データ ソース構成ウィザードで、サンプル オブジェクトに基づいてアプリケーションにオブジェクトのデータ ソースを作成して構成します。
カスタム オブジェクトのデータにバインドされているフォームにコントロールを追加します。
オブジェクトとデータベース間でデータをやり取りするためにデータセットと TableAdapter を作成します。
TableAdapter のメイン クエリを編集します。
クエリを TableAdapter に追加します。
オブジェクトにデータベースのデータを設定します。
プロジェクトの作成
新しい Windows アプリケーション プロジェクトを作成するには
[ファイル] メニューの [新しいプロジェクト] をクリックします。
「ObjectBindingWalkthrough」という名前の Windows アプリケーションを作成し、[OK] をクリックします。詳細については、「Windows ベースのアプリケーションの作成」を参照してください。
ObjectBindingWalkthrough プロジェクトが作成されてソリューション エクスプローラに追加されます。
このチュートリアルではバインドするいくつかのオブジェクトが必要なため、最初に、顧客と注文を表すサンプル オブジェクトをいくつか作成します。顧客を表すには、1 人の顧客を表す Customer オブジェクトを作成します。注文を表すには、1 件の注文を表す Order オブジェクトと、Order オブジェクトのコレクションを表す Orders オブジェクトを作成します。Customer オブジェクトのコレクションには、BindingSource クラスに組み込まれているコレクションを使用します (詳しくはこのチュートリアルの後半で説明します)。
Customer オブジェクトの作成
Customer オブジェクトを作成するには
[プロジェクト] メニューの [クラスの追加] を選択します。
新しいクラスに「Customer」という名前を付け、[追加] をクリックします。
Customer クラスのコードを次のコードで置き換えます。
メモ : Customer オブジェクトには、Orders 型の ordersCollection プロパティが含まれます。このため、"型 'Orders' が定義されていません。" というメッセージが表示されます。これは予期されたメッセージであり、次のセクションで Order クラスと Orders クラスを作成すると表示されなくなります。
''' <summary> ''' A single customer ''' </summary> Public Class Customer Public Sub New() End Sub ''' <summary> ''' Creates a new customer ''' </summary> ''' <param name="customerId">The ID that uniquely identifies this customer</param> ''' <param name="companyName">The name for this customer</param> ''' <param name="contactName">The name for this customer's contact</param> ''' <param name="contactTitle">The title for this contact</param> ''' <param name="address">The address for this customer</param> ''' <param name="city">The city for this customer</param> ''' <param name="region">The region for this customer</param> ''' <param name="postalCode">The postal code for this customer</param> ''' <param name="country">The country for this customer</param> ''' <param name="phone">The phone number for this customer</param> ''' <param name="fax">The fax number for this customer</param> Public Sub New(ByVal customerId As String, _ ByVal companyName As String, _ ByVal contactName As String, _ ByVal contactTitle As String, _ ByVal address As String, _ ByVal city As String, _ ByVal region As String, _ ByVal postalCode As String, _ ByVal country As String, _ ByVal phone As String, _ ByVal fax As String) customerIDValue = customerId companyNameValue = companyName contactNameValue = contactName contactTitleValue = contactTitle addressValue = address cityValue = city regionValue = region postalCodeValue = postalCode countryValue = country phoneValue = phone faxValue = fax End Sub Private customerIDValue As String ''' <summary> ''' The ID that uniquely identifies this customer ''' </summary> Public Property CustomerID() As String Get Return customerIDValue End Get Set(ByVal value As String) customerIDValue = value End Set End Property Private companyNameValue As String ''' <summary> ''' The name for this customer ''' </summary> Public Property CompanyName() As String Get Return companyNameValue End Get Set(ByVal Value As String) companyNameValue = Value End Set End Property Private contactNameValue As String ''' <summary> ''' The name for this customer's contact ''' </summary> Public Property ContactName() As String Get Return contactNameValue End Get Set(ByVal Value As String) contactNameValue = Value End Set End Property Private contactTitleValue As String ''' <summary> ''' The title for this contact ''' </summary> Public Property ContactTitle() As String Get Return contactTitleValue End Get Set(ByVal Value As String) contactTitleValue = Value End Set End Property Private addressValue As String ''' <summary> ''' The address for this customer ''' </summary> Public Property Address() As String Get Return addressValue End Get Set(ByVal Value As String) addressValue = Value End Set End Property Private cityValue As String ''' <summary> ''' The city for this customer ''' </summary> Public Property City() As String Get Return cityValue End Get Set(ByVal Value As String) cityValue = Value End Set End Property Private regionValue As String ''' <summary> ''' The region for this customer ''' </summary> Public Property Region() As String Get Return regionValue End Get Set(ByVal Value As String) regionValue = Value End Set End Property Private postalCodeValue As String ''' <summary> ''' The postal code for this customer ''' </summary> Public Property PostalCode() As String Get Return postalCodeValue End Get Set(ByVal Value As String) postalCodeValue = Value End Set End Property Private countryValue As String ''' <summary> ''' The country for this customer ''' </summary> Public Property Country() As String Get Return countryValue End Get Set(ByVal Value As String) countryValue = Value End Set End Property Private phoneValue As String ''' <summary> ''' The phone number for this customer ''' </summary> Public Property Phone() As String Get Return phoneValue End Get Set(ByVal Value As String) phoneValue = Value End Set End Property Private faxValue As String ''' <summary> ''' The fax number for this customer ''' </summary> Public Property Fax() As String Get Return faxValue End Get Set(ByVal Value As String) faxValue = Value End Set End Property Private ordersCollection As New System.ComponentModel.BindingList(Of Order) ''' <summary> ''' The orders for this customer ''' </summary> Public Property Orders() As System.ComponentModel.BindingList(Of Order) Get Return ordersCollection End Get Set(ByVal value As System.ComponentModel.BindingList(Of Order)) ordersCollection = value End Set End Property Public Overrides Function ToString() As String Return Me.CompanyName & " (" & Me.CustomerID & ")" End Function End Class
namespace ObjectBindingWalkthrough { /// <summary> /// A single customer /// </summary> public class Customer { /// <summary> /// Creates a new customer /// </summary> public Customer() { } /// <summary> /// Creates a new customer /// </summary> /// <param name="customerID"></param> /// <param name="companyName"></param> /// <param name="contactName"></param> /// <param name="contactTitle"></param> /// <param name="address"></param> /// <param name="city"></param> /// <param name="region"></param> /// <param name="postalCode"></param> /// <param name="country"></param> /// <param name="phone"></param> /// <param name="fax"></param> public Customer(string customerID, string companyName, string contactName, string contactTitle, string address, string city, string region, string postalCode, string country, string phone, string fax) { customerIDValue = customerID; } private string customerIDValue; /// <summary> /// The ID that uniquely identifies this customer /// </summary> public string CustomerID { get { return customerIDValue; } set { customerIDValue = value; } } private string companyNameValue; /// <summary> /// The name for this customer /// </summary> public string CompanyName { get { return companyNameValue; } set { companyNameValue = value; } } private string contactNameValue; /// <summary> /// The name for this customer's contact /// </summary> public string ContactName { get { return contactNameValue; } set { contactNameValue = value; } } private string contactTitleValue; /// <summary> /// The title for this contact /// </summary> public string ContactTitle { get { return contactTitleValue; } set { contactTitleValue = value; } } private string addressValue; /// <summary> /// The address for this customer /// </summary> public string Address { get { return addressValue; } set { addressValue = value; } } private string cityValue; /// <summary> /// The city for this customer /// </summary> public string City { get { return cityValue; } set { cityValue = value; } } private string regionValue; /// <summary> /// The region for this customer /// </summary> public string Region { get { return regionValue; } set { regionValue = value; } } private string postalCodeValue; /// <summary> /// The postal code for this customer /// </summary> public string PostalCode { get { return postalCodeValue; } set { postalCodeValue = value; } } private string countryValue; /// <summary> /// The country for this customer /// </summary> public string Country { get { return countryValue; } set { countryValue = value; } } private string phoneValue; /// <summary> /// The phone number for this customer /// </summary> public string Phone { get { return phoneValue; } set { phoneValue = value; } } private string faxValue; /// <summary> /// The fax number for this customer /// </summary> public string Fax { get { return faxValue; } set { faxValue = value; } } private System.ComponentModel.BindingList<Order> ordersCollection = new System.ComponentModel.BindingList<Order>(); public System.ComponentModel.BindingList<Order> Orders { get { return ordersCollection; } set { ordersCollection = value; } } public override string ToString() { return this.CompanyName + " (" + this.CustomerID + ")"; } } }
Order オブジェクトの作成
Order オブジェクトと Orders コレクションを作成するには
[プロジェクト] メニューの [クラスの追加] を選択します。
新しいクラスに「Order」という名前を付け、[追加] をクリックします。
Order クラス ファイルのコードを次のコードで置き換えます。
''' <summary> ''' A single order ''' </summary> Public Class Order Public Sub New() End Sub ''' <summary> ''' Creates a new order ''' </summary> ''' <param name="orderid">The identifier for this order</param> ''' <param name="customerID">The customer who placed this order</param> ''' <param name="employeeID">The ID of the employee who took this order</param> ''' <param name="orderDate">The date this order was placed</param> ''' <param name="requiredDate">The date this order is required</param> ''' <param name="shippedDate">The date the order was shipped</param> ''' <param name="shipVia">The shipping method for this order</param> ''' <param name="freight">The freight charge for this order</param> ''' <param name="shipName">The name of the recipient for this order</param> ''' <param name="shipAddress">The address to ship this order to</param> ''' <param name="shipCity">The city to ship this order to</param> ''' <param name="shipRegion">The region to ship this order to</param> ''' <param name="shipPostalCode">The postal code to ship this order to</param> ''' <param name="shipCountry">The country to ship this order to</param> Public Sub New(ByVal orderid As Integer, _ ByVal customerID As String, _ ByVal employeeID As Integer, _ ByVal orderDate As DateTime, _ ByVal requiredDate As DateTime, _ ByVal shippedDate As DateTime, _ ByVal shipVia As Integer, _ ByVal freight As Decimal, _ ByVal shipName As String, _ ByVal shipAddress As String, _ ByVal shipCity As String, _ ByVal shipRegion As String, _ ByVal shipPostalCode As String, _ ByVal shipCountry As String) orderIDValue = orderid customerIDValue = customerID employeeIDValue = employeeID orderDateValue = orderDate requiredDateValue = requiredDate shippedDateValue = shippedDate shipViaValue = shipVia freightValue = freight shipAddressValue = shipAddress shipCityValue = shipCity shipRegionValue = shipRegion shipPostalCodeValue = shipPostalCode shipCountryValue = shipCountry End Sub Private orderIDValue As Integer ''' <summary> ''' Identifier for this order ''' </summary> Public Property OrderID() As Integer Get Return orderIDValue End Get Set(ByVal value As Integer) orderIDValue = value End Set End Property Private customerIDValue As String ''' <summary> ''' The customer who placed this order ''' </summary> Public Property CustomerID() As String Get Return customerIDValue End Get Set(ByVal Value As String) customerIDValue = Value End Set End Property Private employeeIDValue As Integer ''' <summary> ''' The ID of the employee who took this order ''' </summary> Public Property EmployeeID() As Integer Get Return employeeIDValue End Get Set(ByVal Value As Integer) employeeIDValue = Value End Set End Property Private orderDateValue As DateTime ''' <summary> ''' The date this order was placed ''' </summary> Public Property OrderDate() As DateTime Get Return orderDateValue End Get Set(ByVal Value As DateTime) orderDateValue = Value End Set End Property Private requiredDateValue As DateTime ''' <summary> ''' The date this order is required ''' </summary> Public Property RequiredDate() As DateTime Get Return requiredDateValue End Get Set(ByVal Value As DateTime) requiredDateValue = Value End Set End Property Private shippedDateValue As DateTime ''' <summary> ''' The date this order was shipped ''' </summary> Public Property ShippedDate() As DateTime Get Return shippedDateValue End Get Set(ByVal Value As DateTime) shippedDateValue = Value End Set End Property Private shipViaValue As Integer ''' <summary> ''' The shipping method for this order ''' </summary> Public Property ShipVia() As Integer Get Return shipViaValue End Get Set(ByVal Value As Integer) shipViaValue = Value End Set End Property Private freightValue As Decimal ''' <summary> ''' The freight charge for this order ''' </summary> Public Property Freight() As Decimal Get Return freightValue End Get Set(ByVal Value As Decimal) freightValue = Value End Set End Property Private shipNameValue As String ''' <summary> ''' The name of the recipient for this order ''' </summary> Public Property ShipName() As String Get Return shipNameValue End Get Set(ByVal Value As String) shipNameValue = Value End Set End Property Private shipAddressValue As String ''' <summary> ''' The address to ship this order to ''' </summary> Public Property ShipAddress() As String Get Return shipAddressValue End Get Set(ByVal Value As String) shipAddressValue = Value End Set End Property Private shipCityValue As String ''' <summary> ''' The city to ship this order to ''' </summary> Public Property ShipCity() As String Get Return shipCityValue End Get Set(ByVal Value As String) shipCityValue = Value End Set End Property Private shipRegionValue As String ''' <summary> ''' The region to ship this order to ''' </summary> Public Property ShipRegion() As String Get Return shipRegionValue End Get Set(ByVal Value As String) shipRegionValue = Value End Set End Property Private shipPostalCodeValue As String ''' <summary> ''' The postal code to ship this order to ''' </summary> Public Property ShipPostalCode() As String Get Return shipPostalCodeValue End Get Set(ByVal Value As String) shipPostalCodeValue = Value End Set End Property Private shipCountryValue As String ''' <summary> ''' The country to ship this order to ''' </summary> Public Property ShipCountry() As String Get Return shipCountryValue End Get Set(ByVal Value As String) shipCountryValue = Value End Set End Property Private customerValue As Customer ''' <summary> ''' The customer this order belongs to ''' </summary> Public Property Customer() As Customer Get Return customerValue End Get Set(ByVal Value As Customer) customerValue = Value End Set End Property End Class ''' <summary> ''' A collection of Orders ''' </summary> Public Class Orders Inherits System.ComponentModel.BindingList(Of Order) End Class
using System; namespace ObjectBindingWalkthrough { /// <summary> /// A single order /// </summary> public class Order { /// <summary> /// Creates a new order /// </summary> public Order() { } /// <summary> /// Creates a new order /// </summary> /// <param name="orderid"></param> /// <param name="customerID"></param> /// <param name="employeeID"></param> /// <param name="orderDate"></param> /// <param name="requiredDate"></param> /// <param name="shippedDate"></param> /// <param name="shipVia"></param> /// <param name="freight"></param> /// <param name="shipName"></param> /// <param name="shipAddress"></param> /// <param name="shipCity"></param> /// <param name="shipRegion"></param> /// <param name="shipPostalCode"></param> /// <param name="shipCountry"></param> public Order(int orderid, string customerID, int employeeID, DateTime orderDate, DateTime requiredDate, DateTime shippedDate, int shipVia, decimal freight, string shipName, string shipAddress, string shipCity, string shipRegion, string shipPostalCode, string shipCountry) { } private int orderIDValue; /// <summary> /// The ID that uniquely identifies this order /// </summary> public int OrderID { get { return orderIDValue; } set { orderIDValue = value; } } private string customerIDValue; /// <summary> /// The customer who placed this order /// </summary> public string CustomerID { get { return customerIDValue; } set { customerIDValue = value; } } private int employeeIDValue; /// <summary> /// The ID of the employee who took this order /// </summary> public int EmployeeID { get { return employeeIDValue; } set { employeeIDValue = value; } } private DateTime orderDateValue; /// <summary> /// The date this order was placed /// </summary> public DateTime OrderDate { get { return orderDateValue; } set { orderDateValue = value; } } private DateTime requiredDateValue; /// <summary> /// The date this order is required /// </summary> public DateTime RequiredDate { get { return requiredDateValue; } set { requiredDateValue = value; } } private DateTime shippedDateValue; /// <summary> /// The date this order was shipped /// </summary> public DateTime ShippedDate { get { return shippedDateValue; } set { shippedDateValue = value; } } private int shipViaValue; /// <summary> /// The shipping method of this order /// </summary> public int ShipVia { get { return shipViaValue; } set { shipViaValue = value; } } private decimal freightValue; /// <summary> /// The freight charge for this order /// </summary> public decimal Freight { get { return freightValue; } set { freightValue = value; } } private string shipNameValue; /// <summary> /// The name of the recipient for this order /// </summary> public string ShipName { get { return shipNameValue; } set { shipNameValue = value; } } private string shipAddressValue; /// <summary> /// The address to ship this order to /// </summary> public string ShipAddress { get { return shipAddressValue; } set { shipAddressValue = value; } } private string shipCityValue; /// <summary> /// The city to ship this order to /// </summary> public string ShipCity { get { return shipCityValue; } set { shipCityValue = value; } } private string shipRegionValue; /// <summary> /// The region to ship this order to /// </summary> public string ShipRegion { get { return shipRegionValue; } set { shipRegionValue = value; } } private string shipPostalCodeValue; /// <summary> /// The postal code to ship this order to /// </summary> public string ShipPostalCode { get { return shipPostalCodeValue; } set { shipPostalCodeValue = value; } } private string shipCountryValue; /// <summary> /// The country to ship this order to /// </summary> public string ShipCountry { get { return shipCountryValue; } set { shipCountryValue = value; } } } /// <summary> /// A collection of Order objects /// </summary> class Orders: System.ComponentModel.BindingList<Order> { } }
[ファイル] メニューの [すべてを保存] をクリックします。
オブジェクト データ ソースの作成
データ ソース構成ウィザードを実行し、前の手順で作成したオブジェクトに基づいてデータ ソースを作成できます。
オブジェクト データ ソースを作成するには
[データ] メニューの [データ ソースの表示] をクリックして、[データ ソース] ウィンドウを開きます。
[データ ソース] ウィンドウの [新しいデータ ソースの追加] をクリックします。
[データソースの種類を選択] ページの [オブジェクト] を選択し、[次へ] をクリックします。
[ObjectBindingWalkthrough] ノードを展開し、[Customer] オブジェクトをクリックします。
メモ : Customer オブジェクトを利用できない場合は [キャンセル] をクリックし、[ビルド] メニューの [ObjectBindingWalkthrough のビルド] をクリックします。プロジェクトが正常に作成された後で、ウィザードを再開すると (手順 2)、カスタム オブジェクトがウィザードに表示されます。
[完了] をクリックします。
[データ ソース] ウィンドウに Customer オブジェクトが表示されます。
データ バインド フォームの作成
[データ ソース] ウィンドウからフォームに項目をドラッグすると、Customer オブジェクトにバインドされたコントロールが作成されます。
オブジェクト プロパティにバインドされたコントロールを持つフォームを作成するには
ソリューション エクスプローラで Form1 を選択し、[デザイナの表示] をクリックします。
[データ ソース] ウィンドウから Form1 に [Customer] ノードをドラッグします。
[Customer] ノードを展開し、[Orders] ノードを [データ ソース] ウィンドウから Form1 にドラッグします。
データをデータベースからカスタム オブジェクトに読み込むための TableAdapters の作成
データをオブジェクトとデータベース間でやり取りするには、TableAdapter を使用します。データ ソース構成ウィザードを使用して、TableAdapter を Customers テーブルと Orders テーブルに作成できます。
TableAdapter を作成するには
[データ] メニューの [新しいデータ ソースの追加] をクリックします。
[データ ソースの種類を選択] ページで、[データベース] をクリックします。
[データ接続の選択] ページで、次のいずれかの操作を行います。
Northwind サンプル データベースへのデータ接続がドロップダウン リストに表示されている場合は選択します。
または
[新しい接続] を選択し、Northwind データベースへの新しいデータ接続を構成します。詳細については、「方法 : SQL Server データベースへの接続を作成する」または「方法 : Access データベースへの接続を作成する」を参照してください。
[アプリケーション構成ファイルに接続文字列を保存] ページで、[次へ] をクリックします。
[データベース オブジェクトの選択] ページの [テーブル] ノードを展開します。
Customers テーブルと Orders テーブルを選択し、[完了] をクリックします。
プロジェクトに NorthwindDataSet が追加され、[データ ソース] ウィンドウの [NorthwindDataSet] ノードの下に Customers テーブルと Orders テーブルが表示されます。
データセットと TableAdapter の Form1 への追加
CustomersTableAdapter、OrdersTableAdapter、および NorthwindDataSet を表すコンポーネントをツールボックスからドラッグして、これらのインスタンスをフォームに追加できます。
Customers テーブルのデータを Customer オブジェクトに設定するには
[ビルド] メニューの [ソリューションのビルド] をクリックします。
ツールボックスから Form1 に NorthwindDataSet をドラッグします。
ツールボックスから Form1 に CustomersTableAdapter をドラッグします。
ツールボックスから Form1 に OrdersTableAdapter をドラッグします。
少数の Customer を返すクエリの CustomersTableAdapter への追加
現実世界のアプリケーションでは、データ テーブルの全体を返すことはまずありません。このチュートリアルでは、上から 5 番目までの顧客を返します。
メモ : |
---|
通常は、どの顧客を返すか選択するためにパラメータを渡すことが多いのですが、このチュートリアルでは説明を簡単にするために 5 人の顧客だけを返すクエリをハードコーディングして、パラメータ値を入力するためのユーザー インターフェイスの作成を省いています。 |
CustomersTableAdapter に別のクエリを追加するには
ソリューション エクスプローラで、NorthwindDataSet.xsd ファイルをダブルクリックします。
データセット デザイナで NorthwindDataSet が開きます。
[CustomersTableAdapter] を右クリックし、[クエリの追加] を選択します。
TableAdapter クエリの構成ウィザードが表示されます。
既定の [SQL ステートメントを使用する] はそのままで、[次へ] をクリックします。
既定の [複数行を返す SELECT] はそのままで、[次へ] をクリックします。
SQL ステートメントを次のコードに置き換え、[次へ] をクリックします。
SELECT Top 5 CustomerID, CompanyName, ContactName, ContactTitle, Address, City, Region, PostalCode, Country, Phone, Fax FROM Customers
[DataTable にデータを格納する] チェック ボックスをオフにします。
[DataTable を返す] メソッドに「GetTop5Customers」という名前を付け、[完了] をクリックします。
GetTop5Customers クエリが CustomersTableAdapter に追加されます。
特定の顧客の注文のみを返す OrdersTableAdapter クエリの変更
データベースから注文をフェッチするときに、注文テーブル全体を返すのではなく、特定の顧客からの注文のみを返す必要があります。次の手順は、TableAdapter を新しいクエリで再構成する方法を示しています。前の手順で CustomersTableAdapter に別のクエリを追加した方法とは対照的です。
1 人の顧客からの注文を返すように TableAdapter のメイン クエリを再構成するには
[OrdersTableAdapter] を右クリックし、[構成] をクリックします。
TableAdapter クエリの構成ウィザードが表示されます。
SQL ステートメントを次のコードに置き換え、[次へ] をクリックします。
SELECT OrderID, CustomerID, EmployeeID, OrderDate, RequiredDate, ShippedDate, ShipVia, Freight, ShipName, ShipAddress, ShipCity, ShipRegion, ShipPostalCode, ShipCountry FROM Orders WHERE CustomerID = @CustomerID
[DataTable にデータを格納する] チェック ボックスをオフにします。
[DataTable を返す] メソッドに「GetDataByCustomerID」という名前を付け、[完了] をクリックします。
OrdersTableAdapter のメイン Fill クエリが、GetDataByCustomerID クエリで置き換えられます。
[ビルド] メニューの [ソリューションのビルド] をクリックして、プロジェクトを作成します。
データを Customer オブジェクトと Order オブジェクトに読み込むためのコードの追加
データをカスタム オブジェクトに読み込むには、新しいデータ テーブルを返す TableAdapter クエリを実行します。既存のデータ テーブルにデータを設定する TableAdapter クエリとは対照的です。コードでは、テーブルをループして、各 Customer オブジェクトに顧客情報を設定し、すべての注文を各 Customer.Orders コレクションに設定します。各 Customer オブジェクトが CustomerBindingSource の内部コレクション (CustomerBindingSource.Add(currentCustomer)) に追加されることに注意してください。つまり、BindingSource は、List プロパティを使ってアクセスできる、厳密に型指定された組み込みの Customers コレクションを提供します。
オブジェクトにデータを読み込むには
ソリューション エクスプローラで Form1 を選択し、[コードの表示] をクリックします。
Form1 のコードを次のコードで置き換えます。
Public Class Form1 Private Sub LoadCustomers() Dim customerData As NorthwindDataSet.CustomersDataTable = _ CustomersTableAdapter1.GetTop5Customers() Dim customerRow As NorthwindDataSet.CustomersRow For Each customerRow In customerData Dim currentCustomer As New Customer() With currentCustomer .CustomerID = customerRow.CustomerID .CompanyName = customerRow.CompanyName If Not customerRow.IsAddressNull Then .Address = customerRow.Address End If If Not customerRow.IsCityNull Then .City = customerRow.City End If If Not customerRow.IsContactNameNull Then .ContactName = customerRow.ContactName End If If Not customerRow.IsContactTitleNull Then .ContactTitle = customerRow.ContactTitle End If If Not customerRow.IsCountryNull Then .Country = customerRow.Country End If If Not customerRow.IsFaxNull Then .Fax = customerRow.Fax End If If Not customerRow.IsPhoneNull Then .Phone = customerRow.Phone End If If Not customerRow.IsPostalCodeNull Then .PostalCode = customerRow.PostalCode End If If Not customerRow.Is_RegionNull Then .Region = customerRow._Region End If End With LoadOrders(currentCustomer) CustomerBindingSource.Add(currentCustomer) Next End Sub Private Sub LoadOrders(ByRef currentCustomer As Customer) Dim orderData As NorthwindDataSet.OrdersDataTable = _ OrdersTableAdapter1.GetDataByCustomerID(currentCustomer.CustomerID) Dim orderRow As NorthwindDataSet.OrdersRow For Each orderRow In orderData Dim currentOrder As New Order() With currentOrder .OrderID = orderRow.OrderID .Customer = currentCustomer If Not orderRow.IsCustomerIDNull Then .CustomerID = orderRow.CustomerID End If If Not orderRow.IsEmployeeIDNull Then .EmployeeID = orderRow.EmployeeID End If If Not orderRow.IsFreightNull Then .Freight = orderRow.Freight End If If Not orderRow.IsOrderDateNull Then .OrderDate = orderRow.OrderDate End If If Not orderRow.IsRequiredDateNull Then .RequiredDate = orderRow.RequiredDate End If If Not orderRow.IsShipAddressNull Then .ShipAddress = orderRow.ShipAddress End If If Not orderRow.IsShipCityNull Then .ShipCity = orderRow.ShipCity End If If Not orderRow.IsShipCountryNull Then .ShipCountry = orderRow.ShipCountry End If If Not orderRow.IsShipNameNull Then .ShipName = orderRow.ShipName End If If Not orderRow.IsShippedDateNull Then .ShippedDate = orderRow.ShippedDate End If If Not orderRow.IsShipPostalCodeNull Then .ShipPostalCode = orderRow.ShipPostalCode End If If Not orderRow.IsShipRegionNull Then .ShipRegion = orderRow.ShipRegion End If If Not orderRow.IsShipViaNull Then .ShipVia = orderRow.ShipVia End If End With currentCustomer.Orders.Add(currentOrder) Next End Sub Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) _ Handles MyBase.Load LoadCustomers() End Sub End Class
using System; using System.Windows.Forms; namespace ObjectBindingWalkthrough { public partial class Form1 : Form { public Form1() { InitializeComponent(); this.Load += Form1_Load; } private void LoadCustomers() { NorthwindDataSet.CustomersDataTable customerData = customersTableAdapter1.GetTop5Customers(); foreach (NorthwindDataSet.CustomersRow customerRow in customerData) { Customer currentCustomer = new Customer(); currentCustomer.CustomerID = customerRow.CustomerID; currentCustomer.CompanyName = customerRow.CompanyName; if (customerRow.IsAddressNull() == false) { currentCustomer.Address = customerRow.Address; } if (customerRow.IsCityNull() == false) { currentCustomer.City = customerRow.City; } if (customerRow.IsContactNameNull() == false) { currentCustomer.ContactName = customerRow.ContactName; } if (customerRow.IsContactTitleNull() == false) { currentCustomer.ContactTitle = customerRow.ContactTitle; } if (customerRow.IsCountryNull() == false) { currentCustomer.Country = customerRow.Country; } if (customerRow.IsFaxNull() == false) { currentCustomer.Fax = customerRow.Fax; } if (customerRow.IsPhoneNull() == false) { currentCustomer.Phone = customerRow.Phone; } if (customerRow.IsPostalCodeNull() == false) { currentCustomer.PostalCode = customerRow.PostalCode; } if (customerRow.IsRegionNull() == false) { currentCustomer.Region = customerRow.Region; } LoadOrders(currentCustomer); customerBindingSource.Add(currentCustomer); } } private void LoadOrders(Customer currentCustomer) { NorthwindDataSet.OrdersDataTable orderData = ordersTableAdapter1.GetDataByCustomerID(currentCustomer.CustomerID); foreach (NorthwindDataSet.OrdersRow orderRow in orderData) { Order currentOrder = new Order(); currentOrder.OrderID = orderRow.OrderID; if (orderRow.IsCustomerIDNull() == false) { currentOrder.CustomerID = orderRow.CustomerID; } if (orderRow.IsEmployeeIDNull() == false) { currentOrder.EmployeeID = orderRow.EmployeeID; } if (orderRow.IsFreightNull() == false) { currentOrder.Freight = orderRow.Freight; } if (orderRow.IsOrderDateNull() == false) { currentOrder.OrderDate = orderRow.OrderDate; } if (orderRow.IsRequiredDateNull() == false) { currentOrder.RequiredDate = orderRow.RequiredDate; } if (orderRow.IsShipAddressNull() == false) { currentOrder.ShipAddress = orderRow.ShipAddress; } if (orderRow.IsShipCityNull() == false) { currentOrder.ShipCity = orderRow.ShipCity; } if (orderRow.IsShipCountryNull() == false) { currentOrder.ShipCountry = orderRow.ShipCountry; } if (orderRow.IsShipNameNull() == false) { currentOrder.ShipName = orderRow.ShipName; } if (orderRow.IsShippedDateNull() == false) { currentOrder.ShippedDate = orderRow.ShippedDate; } if (orderRow.IsShipPostalCodeNull() == false) { currentOrder.ShipPostalCode = orderRow.ShipPostalCode; } if (orderRow.IsShipRegionNull() == false) { currentOrder.ShipRegion = orderRow.ShipRegion; } if (orderRow.IsShipViaNull() == false) { currentOrder.ShipVia = orderRow.ShipVia; } currentCustomer.Orders.Add(currentOrder); } } private void Form1_Load(object sender, EventArgs e) { LoadCustomers(); } } }
アプリケーションのテスト
アプリケーションをテストするには
F5 キーを押してアプリケーションを実行します。
フォームが開き、サンプル データで DataGridView コントロールが作成されます。
DataGridView の顧客に移動し、その顧客からの注文を表示します。
次の手順
アプリケーションに機能を追加するには
カスタム オブジェクトからデータをデータベースに返送するコードを追加します。詳細については、「方法 : TableAdapter で直接データベースにアクセスする」を参照してください。
DataGridView スマート タグの [列の編集] をクリックして、[DataGridView] の列を並べ替えます。