                     .Parameters.Add(New System.Data.OleDb.OleDbParameter("DCode", System.Data.OleDb.OleDbType.VarChar, 000, Me.DCode.Text))                     .Parameters.Add(New System.Data.OleDb.OleDbParameter("DName", System.Data.OleDb.OleDbType.VarChar, 000, Me.D