.NET - Convertendo uma fonte de dados MS Access para PostgreSQL

Imports System.Data
Imports Npgsql

Public Class form1

    Shared serverName As String = "127.0.0.1"
    Shared port As String = "5432"
    Shared userName As String = "postgres"
    Shared password As String = "sua_senha"
    Shared databaseName As String = "Northwind_pgsql"
    Private pgsqlConnection As NpgsqlConnection = Nothing
    Private connString As String = Nothing

    Private Sub btnExecutar_Click(sender As Object, e As EventArgs) Handles btnExecutar.Click

        Dim ConexaoPG As String = String.Format("Server={0};Port={1};User Id={2};Password={3};Database={4};", 
serverName, port, userName, password, databaseName)
        Dim conn As NpgsqlConnection = Nothing
        Try
            'Instancia NpgsqlConnection na variavel conn
            conn = New NpgsqlConnection(ConexaoPG)
            'Abre a conexão
            conn.Open()
            'Declara e atribui a instrucao SQL de consulta
            Dim SQL As String = "SELECT * FROM public." & cboTabelas.Text
            'Instancia o NpgsqlDataAdapter responsavel pela comunicação
            'é feita a leitura dos dados preenchendo o dataset
            Dim da As Npgsql.NpgsqlDataAdapter = New NpgsqlDataAdapter(SQL, conn)
            'Instancia um DataSet
            Dim ds As DataSet = New DataSet()
            'Preenche o DataAdapter
            da.Fill(ds, cboTabelas.Text)
            'Atribui um Datasource a Grid
            dgvDados.DataSource = ds.Tables(0).DefaultView
        Catch ex As Exception
            MsgBox(ex.Message)
        Finally
            If Not conn Is Nothing Then
                If conn.State = ConnectionState.Open Then
                    conn.Close()
                End If
            End If
        End Try
    End Sub

    Private Sub form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
        cboTabelas.SelectedIndex = 0
    End Sub
End Class

using System;
using System.Data;
using System.Windows.Forms;
using Npgsql;

namespace PostgreSQL_CSharp
{
    public partial class Form1 : Form
    {

        static string serverName = "127.0.0.1";
        static string port = "5432";
        static string userName = "postgres";
        static string password = "sua_senha";
        static string databaseName = "Northwind_pgsql";

        public Form1()
        {
            InitializeComponent();
        }

        private void btnExecutar_Click(object sender, EventArgs e)
        {
            string ConexaoPG = string.Format("Server={0};Port={1};User Id={2};Password={3};Database={4};", 
serverName, port, userName, password, databaseName);
            NpgsqlConnection conn = null;
            try
            {
                //Instancia NpgsqlConnection na variavel conn
                conn = new NpgsqlConnection(ConexaoPG);
                //Abre a conexão
                conn.Open();
                //Declara e atribui a instrucao SQL de consulta
                string SQL = "SELECT * FROM public." + cboTabelas.Text;
                //Instancia o NpgsqlDataAdapter responsavel pela comunicação
                //é feita a leitura dos dados preenchendo o dataset
                Npgsql.NpgsqlDataAdapter da = new NpgsqlDataAdapter(SQL, conn);
                //Instancia um DataSet
                DataSet ds = new DataSet();
                //Preenche o DataAdapter
                da.Fill(ds, cboTabelas.Text);
                //Atribui um Datasource a Grid
                dgvDados.DataSource = ds.Tables[0].DefaultView;
            }
            catch (Exception ex)
            {
                MessageBox.Show(ex.Message);
            }
            finally
            {
                if ((conn != null))
                {
                    if (conn.State == ConnectionState.Open)
                    {
                        conn.Close();
                    }
                }
            }
        }

        private void Form1_Load(object sender, EventArgs e)
        {
            cboTabelas.SelectedIndex = 0;
        }
    }
}

Quer migrar para o VB .NET ?

• Veja mais sistemas completos para a plataforma .NET no Super DVD .NET , confira...

• Curso Básico VB .NET - Vídeo Aulas

Quer aprender C# ??

• Chegou o Super DVD C# com exclusivo material de suporte e vídeo aulas com curso básico sobre C#.

• Curso C# Basico - Video Aulas

Quer aprender os conceitos da Programação Orientada a objetos ?

• Curso Fundamentos da Programação Orientada a Objetos com VB .NET

Quer aprender o gerar relatórios com o ReportViewer no VS 2013 ?

•  Curso - Gerando Relatórios com o ReportViewer no VS 2013 - Vídeo Aulas