Este ejemplo, está hecho en VB.Net 2017, pero debe resultarte. Está conectado a MySQL como "localhost" pero también puedes cambiarlo. No olvides que los indices comienzan con cero (0), te lo he dejado con "MessageBox" como para que se entienda, cuestión de con un bucle recorrer todo:
Imports MySql. Data. MySqlClient
Public Class Form1
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
Dim cadena As String = "Server=localhost;Database=pruebas;Uid=root;Pwd=;"
Dim myConnection As MySqlConnection = New MySqlConnection()
myConnection.ConnectionString = cadena
myConnection.Open()
Dim adap = New MySqlDataAdapter("select * from Tablita", myConnection)
Dim ds = New DataSet()
adap.Fill(ds, "tablita")
MessageBox.Show("Numero de filas/registros = " & ds.Tables(0).Rows.Count)
MessageBox.Show("Número de columnas/campos = " & ds.Tables(0).Columns.Count)
MessageBox.Show("Posicion fila 0 columna 0 = " & ds.Tables(0).Rows(0)(0))
myConnection.Close()
End Sub
End Class
He asumido, también, que te conectas usando el conector Net de MySQL y usando de "referencia" su "MySQL.Data".
Abraham Valencia