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