data = New DataTable
 
        Dim connStr As String
        connStr = String.Format("server={0};user id={1}; password={2};" & _
          "database=mysql; pooling=false", MainMod.mysql_server, _
          MainMod.mysql_user, MainMod.mysql_pw, MainMod.mysql_db)
        conn = New MySqlConnection(connStr)
        conn.Open()
        conn.ChangeDatabase(MainMod.mysql_db)
 
        da = New MySqlDataAdapter("SELECT artikelnummer, bezeichnung FROM" & _
          "artikel", conn)
        cb = New MySqlCommandBuilder(da)
 
        da.Fill(data)
 
 
        DataGrid.DataSource = data