Web Listing 2: Implementing Form Load

Private Sub Form1_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
        Me.GetCustomersByStateTableAdapter.Connection.Open()
        Me.GetOrdersByCustomerTableAdapter.Connection.Open()
        Me.GetItemsByCustomerOrderTableAdapter.Connection.Open()
        Me.AddressesTableAdapter.Connection.Open()
    End Sub