Conexión Visual Basic 2010 a Bases de datos MySql

Visual Basic y MySql

Primero que nada Creamos un Modulo con el nombre que estimen combeniente


Luego Importamos las librerías de MySql:

Imports MySql.Data
Imports MySql.Data.MySqlClient

Luego Creamos La conexión a la base de Datos:

Friend Conector as =As New String = "server=localhost;database=BaseDeDatos;Uid=root;pwd=Clave"

Friend conexion As New MySqlConnection(Conector)


Luego declaramos unas Variables Para Generar las consultas y guardarlas en tablas 

    Friend sc As New MySqlCommand

    Friend da As New MySqlDataAdapter
    Friend ds As New DataSet()
    Friend dt As New DataTable


Crear una consulta y agregarlas a una tabla

        conexion.Close()   ' Cerramos la Conexión Para no tener errores de Conexión
        ds.Tables.Clear()   ' Borramos las tablas Guardadas
        dt.Rows.Clear()     ' Borramos las filas 
        dt.Columns.Clear() ' Borramos las Columnas
        ds.Clear()              ' Borramos el DataSet
        conexion.Open()    ' abrimos la conexión
        sc.Connection = conexion  ' Luego le pasamos la conexión al MySqlCommand
        sc.CommandText = "Select * From Tabla" ' Le entregamos la consulta Sql
        da.SelectCommand = sc  ' Luego le pasamos la consulta al DataAdapter
        da.Fill(dt) ' Luego filtramos la consulta en la Tabla de Datos
        ds.Tables.Add(dt) ' y le pasamos las tablas al DataSet


Para mostrar el resultado de la consulta a un DataGridView

DataGridView1..DataSource = ds.Tables(dt.TableName)

Luego lo Actualizare con mas datos