هذا الكود لا يعمل ولا أعرف السبب وهو كود زر جديد في برنامج قواعد بيانات
Dim CmdB As New OleDb.OleDbCommandBuilder(Dap)
Dim dsNewRow As DataRow
dsNewRow = Dst.Tables("Mego").NewRow()
dsNewRow.Item("Name") = txtFirstName.Text
dsNewRow.Item("Country") = txtSurname.Text
( Dst.Tables("Mego").Rows.Add(dsNewRow)
(" Dap.Update(Dst, "Mego")