TST.vb 453 B

12345678910111213141516
  1. Public Class TST
  2. Private dt As DataTable
  3. Private Sub TST_Load(sender As Object, e As EventArgs) Handles MyBase.Load
  4. End Sub
  5. Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
  6. Dim o As New InversionDAO
  7. Me.DataGridView1.DataSource = o.VistaInversiones_ValorNominal
  8. End Sub
  9. Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click
  10. End Sub
  11. End Class