ciao,

io stò facendo un programmino con VB2008 che si appoggia a MySQL.
ti posto una semplice query di salvataggio nel DB. Attenzione alla stringa di connessione perchè i parametri vengono letti da settings e quindi la devi modificare:

codice:
 Public stringa As String = "Server=" & My.Settings.host & "; Database=" & My.Settings.database & "; Uid= " & My.Settings.username & "; Pwd= " & My.Settings.password & ";"
    Public connessione As New MySqlConnection(stringa)
poi abbiamo la query vera e propria

codice:
Try
            frmMain.connessione.Open()
            Dim salva As String = "INSERT INTO clienti(id, id_categoria, ragione_sociale_1,ragione_sociale_2, indirizzo_1, indirizzo_2,CAP, citta, provincia, codice_fiscale, partita_iva, id_pagamento) VALUES ('NULL', '" & cmbCategoria.SelectedIndex & "', '" & txtRagioneSociale1.Text & "', '" & txtRagioneSociale2.Text & "', '" & txtIndirizzo1.Text & "', '" & txtIndirizzo2.Text & "', '" & txtCAP.Text & "', '" & txtComune.Text & "', '" & txtProvincia.Text & "', '" & txtCF.Text & "', '" & txtPIVA.Text & "', 'NULL');"
            Dim salvataggio As New MySqlCommand(salva, frmMain.connessione)
            salvataggio.ExecuteNonQuery()
            frmMain.connessione.Close()
            frmClienti.dgwClienti.Refresh()
            frmClienti.popola_clienti()
        Catch ex As Exception
            frmMain.connessione.Close()
            MsgBox(ex.Message)
        End Try
Ricordati di aggiungere il riferimento a Mysql e fare l'imports