Conexión MySQL en Visual Studio 2012

Para configurar una conexión a la base de datos en MySQL a un servidor local o a una ip, probé muchos códigos y finalmente sólo funciona este de aquí.

Conexión MySQL en Visual Studio 2012

• Debemos importar Imports MySql.Data.MySqlClient
• Creamos una nueva conexión MySQL con nuestros parámetros

Imports MySql.Data.MySqlClient

Public Class Clase1
  Dim conexion As New MySqlConnection ("server=localhost;user=sodks;password=sodks89;database=vb;port=3306")

• Cuando queramos operar para hacer consultas, inserciones, etc primero deberemos abrir y después cerrar la conexión
• Aquí tenemos un ejemplo de borrar un cliente de la base de datos según un ID

Try

    Dim cadena = String.Format("DELETE FROM clientes WHERE id_cliente = ?id")

    Dim eliminar As New MySqlCommand(cadena, conexion)

    eliminar.Parameters.AddWithValue("?id", id)

    conexion.Open()

    eliminar.ExecuteNonQuery()

    conexion.Close()

 Catch ex As Exception

    MsgBox("Error: " & ex.Message, vbCritical, "Error")

 End Try