' Visual Basic
' 當更改選定客戶時,清除訂單列表。
lbOrders.Items.Clear()
rtbDetails.Text = ""
' 將每個相關訂單的訂單 ID 添加到列表框中。
Dim drOrder As DataRow
For Each drOrder In draOrders
lbOrders.Items.Add(drOrder("OrderID"))
Next
在 Solution Explorer(方案總管)中,按右鍵 Form1 並從捷徑功能表中選擇 View Designer(視圖設計器)。
將“訂單明細”表從 Server Explorer(伺服器總管)中拖到表單上。元件匣中將顯示一個新的資料配接器。
選擇該新的資料配接器並將其 Name 屬性設定為 daOrderDetails。
將“產品”表從 Server Explorer(伺服器總管)中拖到表單上。元件匣中將顯示一個新的資料配接器。
選擇該新的資料配接器並將其 Name 屬性設定為 daProducts。
新表只是被添加到了表單上,因此每次添加額外的表時,都必須重建資料集。
重建 dsNorthwind 資料集
從 Data(資料)菜單中,選擇 Generate Dataset(產生資料集)。
提示:將游標移到表單上即可使用 Data(資料)菜單。
單擊 Existing(現有),然後選擇 dsNorthwind 資料集。
選擇所有四個表(客戶表、訂單表、訂單明細表和產品表)。
清除 Add this dataset to the designer(將此資料集添加到設計器)複選框,然後單擊 OK(確定)。將產生帶有附加表的資料集。
注意:如果出現一個對話方塊,其中說明“The file has been modified outside of the source editor. Do you want to reload it?”(檔案已在源編輯器之外被修改。是否要重新載入?),請單擊 Yes(是)。
請記住,產生資料集並不能自動建立資料集中各表之間的關係。