Visual Basic.NET - Como Guardar Registros Exportados de excel a un datagridview en una tabla mysql

Imports System.Data.OleDb

Public Class Form1

    'Dim ruta As String = System.AppDomain.CurrentDomain.BaseDirectory & "datos\libro1.xls" 'ruta donde se guarda la foto esta en la raiz de la aplicacion

    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

        Dim ruta As String

        OpenFileDialog1.ShowDialog()

        ruta = OpenFileDialog1.FileName

        'dataset

        Dim Ds As New DataSet()

        'conneccion

        Dim Conn As New OleDb.OleDbConnection

        Conn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;" & "Data Source= " & ruta & _

        "; Extended Properties=Excel 8.0;"

        'dataadapter 

        Dim DA As New OleDb.OleDbDataAdapter("SELECT * FROM [hoja1$]", Conn)

        'cargas al dataset

        DA.Fill(Ds)

        dg1.DataSource = Ds

        dg1.DataMember = Ds.Tables(0).TableName

    End Sub

    Private Sub cmdguardar_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles cmdguardar.Click

        For i As Integer = 0 To dg1.Rows.Count - 1

            'use un procedimiento almacenado en sql 

            produc("sp_producto", "producto", dg1.Rows(i).Cells(0).Value, dg1.Rows(i).Cells(1).Value) 'todas las q sean necesarias

        Next i

    End Sub

End Class