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=;Database=;Uid=;Pwd=;"
        oMySqlConn.Open()
 
        Dim SQL As String = "SELECT * FROM cds"
        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("titel"))
            'Me.ListView1.Items.Add(dr("Feldname"))
        Next
        For Each dr In dt.Rows
            Me.test2.Items.Add(dr("interpret"))
            'Me.ListView1.Items.Add(dr("Feldname"))
        Next
    End Sub
End Class