منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

عنى جدول به داتا يتكون من اعمده ولكن البعض منها غير متساوى

اى عندما استدعى الداتا يعطى البرنامج ارور بيقول ان صف به اماكن فاضيه ومش عارف اعمل ايه

أخي الكريم استخدمت هذا الكود لحذف كل الصفوف التي لا يحتوي بها الحقل Num علي أي شئ
Dim AdoCmd As New ADODB.Command
Dim z As Long

For z = 1 To 2
AdoCmd.ActiveConnection = Adodc1.ConnectionString
AdoCmd.CommandText = "DELETE FROM T WHERE (Num IS NULL)"
AdoCmd.Execute
Adodc1.Refresh
Next z
ولكن ماذا افعل عند حذف الصفوف التي يزيد فيها عدد الحقول التي لا تحتوي علي شئ

افيدونا اخواني الكرام

بمعني ان لو كان عدد الحقول اللتي لاتحتوي علي شئ أكثر من 1 ماذا يكون الكود

بإمكانك إستبدال القيم Null بالقيمة صفر
أو حمل التمرين و نحاول معه لكي تتفادى الرسالة المزعجة

هذا مثال على إستبدال قيم Null بالصفر

شكرا جزيلا

واذا كانت القيم الماخوزه بواسطة combo1 فما للحل

فين الشباب