Inversiones/frmCuentasBancarias.vb

Public Class frmCuentasBancarias
    Private Sub frmCuentasBancarias_Load(sender As Object, e As EventArgs) Handles MyBase.Load
        'TODO: esta línea de código carga datos en la tabla 'InversionesDataSet1.BAN2' Puede moverla o quitarla según sea necesario.
        Me.BAN2TableAdapter.Fill(Me.InversionesDataSet1.BAN2)
        'TODO: esta línea de código carga datos en la tabla 'InversionesDataSet1.EMPR' Puede moverla o quitarla según sea necesario.
        Me.EMPRTableAdapter.Fill(Me.InversionesDataSet1.EMPR)
        'TODO: esta línea de código carga datos en la tabla 'InversionesDataSet1.BAN0' Puede moverla o quitarla según sea necesario.
        Me.BAN0TableAdapter.Fill(Me.InversionesDataSet1.BAN0)
        'TODO: esta línea de código carga datos en la tabla 'InversionesDataSet1.BAN1' Puede moverla o quitarla según sea necesario.
        Me.BAN1TableAdapter.Fill(Me.InversionesDataSet1.BAN1)

    End Sub

    Private Sub BAN1BindingNavigatorSaveItem_Click(sender As Object, e As EventArgs) Handles BAN1BindingNavigatorSaveItem.Click
        Me.Validate()
        Me.BAN1BindingSource.EndEdit()
        Me.TableAdapterManager.UpdateAll(Me.InversionesDataSet1)

    End Sub

    Private Sub FillByToolStripButton_Click(sender As Object, e As EventArgs)
        Try
            Me.BAN1TableAdapter.FillBy(Me.InversionesDataSet1.BAN1)
        Catch ex As System.Exception
            System.Windows.Forms.MessageBox.Show(ex.Message)
        End Try

    End Sub
End Class