[جيولوجي مبتدئ]

السلام عليكم ورحمة الله وبركاته 
ياشباب أريد أن أبحث عن سجل في جدول في قاعدة بيانات sql والبحث بأكثر من شرط المطلوب إذا لم يجد السجل الذي أبحث عنه يرسل msgbox  أنه لايوجد سجل مطابق 
وهذا الكود الذي أستخدمه بالبحث علماً بأن الكود ناجح بالبحث واستخراج السجل الموجود ولكني أريده أن يظهر الرسالة اذا لم يوجد سجل مطابق 

  Dim i1 As Integer

                For i1 = 0 To dt16.Rows.Count - 1

                    If dt16.Rows(i1)(4).ToString = DataGridView2.CurrentRow.Cells(4).Value.ToString And dt16.Rows(i1)(1).ToString = DataGridView2.CurrentRow.Cells(1).Value.ToString And dt16.Rows(i1)(6).ToString = "تأخر " And dt16.Rows(i1)(7).ToString = ComboBox7.Text Then

                        TextBox41.Text = dt16.Rows(i1)(8).ToString()

                    End If

                Next

دمتم بود 
لكم جزيل الشكر

[Jounior_P]

زود Else قبل نهاية جملة If وصع الرسالة الخاصة بعدم وجود سجل مطابق

[جيولوجي مبتدئ]

(11-06-21, 02:46 AM)Jounior_P كتب : زود Else  قبل نهاية جملة If  وصع الرسالة الخاصة بعدم وجود سجل مطابق

ألف شكر لك أخي 
مش عارف كيف راحت على فكرة زي دي  ............ هذه مشكلة من يعمل وهو مرهق وسهران 

لك جزيل الشكر 
دمت بود

[مصمم هاوي]

(11-06-21, 01:38 PM)جيولوجي مبتدئ كتب :

(11-06-21, 02:46 AM)Jounior_P كتب : زود Else  قبل نهاية جملة If  وصع الرسالة الخاصة بعدم وجود سجل مطابق

ألف شكر لك أخي 
مش عارف كيف راحت على فكرة زي دي  ............ هذه مشكلة من يعمل وهو مرهق وسهران 

لك جزيل الشكر 
دمت بود

صدقت وما أكثر ما يحدث معي هههههه