' 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（是）。 请记住，生成数据集并不能自动创建数据集中各表之间的关系。
