Imports System
Imports System.Data
Imports System.Data.SqlClient
Imports System.Windows.Forms
Imports System.IO
 
Partial Public Class Form5
    Inherits Form
    Private CustomersDataGridView As New DataGridView()
    Private OrdersDataGridView As New DataGridView()
    Private customersBindingSource As New BindingSource()
 
 
    <STAThreadAttribute()> _
Public Shared Sub Main()
        Application.Run(New Form5())
    End Sub
 
    Public Sub New()
        InitializeComponent()
    End Sub
    Private Sub Form5_Load(ByVal sender As Object, ByVal e As System.EventArgs) _
      Handles Me.Load
 
        GetData()
 
        CustomersDataGridView.AutoResizeColumns()
        OrdersDataGridView.AutoSizeColumnsMode = _
          DataGridViewAutoSizeColumnMode.AllCells
    End Sub
    Private Sub GetData()
        '' '' ''Dim customersOrdersRelation As New DataRelation( _
          "CustomersOrders", _
        '' '' ''NWDS.Tables("Customers").Columns("CustomerID"), _
        '' '' ''NWDS.Tables("Orders").Columns("CustomerID"))
        '' '' ''NWDS.Relations.Add(customersOrdersRelation)
        NWDS.Relations.Add("CustomersOrders", _
                           NWDS.Tables("Customers").Columns("CustomerID"), _
                           NWDS.Tables("Orders").Columns("CustomerID"))
        With customersBindingSource
            .DataSource = CustomersBindingSource1
            .DataMember = "CustomersOrders"
        End With
 
    End Sub
 
End Class