تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
رسالة خطأ بمجرد الضغط داخل التكست بوكس
#1
السلام عليكم لدي داتاقريد فيو عند الضغط عليها تقوم بتعبئة التيكست بوكس
ولكن عند الضغط داخل التيكست بوكس تضهر رسالة خطأ بأن 
"هذاالإسم مدخل مسبقا تأكد من ذلك" بالرغم أن الإسم غير مكرر في الداتاقريد التي تحمل محتوى الجدول

أنا أستعمل الكود الموالي حتى لا تكرر الأسماء في الجدول

كود :
Private Sub TextBoxNomPren_LostFocus(ByVal sender As Object, ByVal e As EventArgs) Handles TextBoxNomPren.LostFocus
       Try
           If con.State = ConnectionState.Closed Then con.Open()
           Dim cmd As New OleDbCommand(" Select nom From TableEmp Where nom='" & TextBoxNomPren.Text & "'", con)
           Dim sda As OleDbDataReader = cmd.ExecuteReader
           If sda.HasRows Then
               MsgBox("هذاالإسم مدخل مسبقا تأكد من ذلك", InfoOkOnly, AppTitle)
               TextBoxNomPren.SelectAll()
               TextBoxNomPren.Focus()
               Exit Sub
               If con.State = ConnectionState.Open Then con.Close()
           End If
       Catch ex As Exception

       End Try
   End Sub
بحيث أريد من هذا الكود يشتغل فقط في عملية الحفظ إذا كان الإسم المدخل مكرر
والسلام عليكم ورحمة الله وبركاته
الرد
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  [كود] طلب كود جعل انبوت بوكس باسورد Codack 0 32 منذ 8 ساعة مضت
آخر رد: Codack
  ممكن كود استدعاء اى برنامج داخل الفورم الرئيسيه sherf 5 447 , 07:50 AM
آخر رد: alshandodi
  طلب كود لحذف الجزء المظلل عليه من النص في التيكست بوكس waelalmsry75 3 86 22-02-20, 12:37 PM
آخر رد: alsalamoni
  قراءة لون لخلفية الزر من قيمة في التكست بوك Mohammed Nafa 3 52 21-02-20, 06:34 PM
آخر رد: alsalamoni
  ارسال رسالة نصية بالهاتف المتألق9 11 873 15-02-20, 06:50 PM
آخر رد: IBRA99000
Heart حول كود إدراج بيانات داتا غريد في جدول داخل التقرير كريستال Al Wilaya 10 365 14-02-20, 01:39 AM
آخر رد: Al Wilaya
  كيفية حساب عدد الأرقام داخل textbox ahmedfa71 3 153 06-02-20, 08:24 PM
آخر رد: bajo
  كيف يمكن وضع رابط خارجي داخل الفورم محمدالزند 2 108 06-02-20, 10:59 AM
آخر رد: محمدالزند
  [VB.NET] كيفية انشاء QR CODE داخل ريبورت فيوير khairallah 1 114 27-01-20, 04:54 PM
آخر رد: Rabeea Qbaha
Information طلب كواد رسالة تنبيه في شريط المهام ahmed20 4 230 26-01-20, 07:03 PM
آخر رد: alshandodi

التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم