Imports MySql.Data.MySqlClient
Public Class Form1
 
    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As _
      System.EventArgs) Handles MyBase.Load
        Dim oMySqlConn As MySqlConnection = New MySqlConnection()
        oMySqlConn.ConnectionString = _
          "Server=192.168.2.103;Database=cdcol;Uid=root;Pwd=;"
        oMySqlConn.Open()
 
        Dim SQL As String = "SELECT * FROM cdcol"
        Dim da As New MySqlDataAdapter(SQL, oMySqlConn)
        Dim cmdB As New MySqlCommandBuilder(da)
        Dim ds As New DataSet()
 
        da.Fill(ds, "cds")
        'da.Fill(ds, "Tabellenname")
 
        Dim dt As DataTable = ds.Tables("cds")
        'Dim dt As DataTable = ds.Tables("Tabellenname")
        Dim dr As DataRow
 
        For Each dr In dt.Rows
            Me.test.Items.Add(dr("Famname"))
            'Me.ListView1.Items.Add(dr("Feldname"))
        Next
    End Sub
End Class