Visual Basic.NET - Mysql y vb.net 2010

Imports MySql.Data.MySqlClient

Public Class Form1

    Dim oconexion As New MySqlConnection

    Dim adapatador As New MySqlDataAdapter

    Dim rsdatos As New DataSet

    Private Sub Ingresar_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Ingresar.Click

        Try

            oconexion.ConnectionString = "server=locahost;user id=root; password=; database=bdusuarios"

            oconexion.Open()

            Dim CONSULTA As String

            CONSULTA = "SELECT * FROM usuarios"

            adapatador = New MySqlDataAdapter(CONSULTA, oconexion)

            rsdatos = New DataSet

            adapatador.Fill(rsdatos, "usuarios")

            DataGridView1.DataSource = rsdatos

            DataGridView1.DataMember = "usuarios"

        Catch ex As Exception

            MsgBox(ex.Message)

        End Try

    End Sub

End Class