Utilizando l DataSet con visual estudio 2015

Utilizando l DataSet 

l DataSet de ADO.NET es una representación de datos residente en memoria que proporciona un modelo de programación relacional coherente independientemente del origen de datos que contiene.Un DataSet representa un conjunto completo de datos, incluyendo las tablas que contienen, ordenan y restringen los datos, así como las relaciones entre las tablas.

Hay varias maneras de trabajar con un DataSet, que se pueden aplicar de forma independiente o conjuntamente.Puede realizar lo siguiente:

Diseñe el siguiente formulario En visual estudio

y despues crea un metodo ()llamado “metododataset”

 codifica y lo siguiente

Imports System.Data

Imports System.Data.SqlClient

Public Class metodosdataset

    Public Shared cn As New SqlConnection("Data Source=LENOVO-PC\CPI;Initial Catalog=ImportacionesNet;Integrated Security=True")

    Public Shared Function dstablas() As DataSet

        Try

            Dim da As New SqlDataAdapter("select * from productos", cn)

            Dim ds As New DataSet

            ds.Clear()

            da.Fill(ds, "productos")

            da.SelectCommand.CommandText = "select*from clientes"

            da.Fill(ds, "clientes")

            da.SelectCommand.CommandText = "select*from proveedores"

            da.Fill(ds, "prov")

            Return ds

        Catch ex As Exception

            Throw ex

        End Try

    End Function

End Class

codigo en formulario principal

código en buttons

Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click

' aqui llamamos nuestro metodos dataset que se creo anteriormente

        Me.DataGridView1.DataSource = metodosdataset.dstablas.Tables("clientes")

    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click

        Me.DataGridView1.DataSource = metodosdataset.dstablas.Tables("productos")

    End Sub

    Private Sub Button3_Click(sender As Object, e As EventArgs) Handles Button3.Click

        Me.DataGridView1.DataSource = metodosdataset.dstablas.Tables("prov")

    End Sub