[عبد العزيز البسكري]

السّلام عليكم و رحمة الله و بركاته

أخي الكريم .. بالنسبة للشطر الأوّل من السؤال ..  الكود الذي تكرّم به الأخ الغالي يشتغل بطريقة رائعة .. فقط ربما لم ينتبه لهذا الجزء البسيط للحساب الدقيق و الإحصاء الصحيح ..

كود :

 Dim cmd As New OleDbCommand(" Select Count(warcha = '" & ComboBox1.Text & "'  ) From Table1 where warcha = '" & ComboBox1.Text & "'  And caase = 'حرفي' ", Conne)

كود :

Dim cmd As New OleDbCommand(" Select Count(warcha = '" & ComboBox1.Text & "'  ) From Table1 where warcha = '" & ComboBox1.Text & "'  And caase = 'متربص' ", Conne)

تحياتي