Dim SQLnot As String = "SELECT * FROM notice"
        Dim danot As New MySqlDataAdapter(SQLnot, oMySqlConn)
        Dim cmdBnot As New MySqlCommandBuilder(danot)
        Dim dsnot As New DataSet
        danot.Fill(dsnot, "notice")
        'da.Fill(ds, "Tabellenname")
 
        Dim dtnot As DataTable = dsnot.Tables("notice")
        'Dim dt As DataTable = ds.Tables("Tabellenname")
        Dim drnot As DataRow
 
        For Each drnot In dtnot.Rows
            TextBox1.Text = (drnot("text"))
            'Me.ListView1.Items.Add(dr("Feldname"))
        Next