بركان قام بنشر يناير 8, 2008 مشاركة قام بنشر يناير 8, 2008 السلام عليكم صممت فورم لادخال البيانات بس للادخال ما تعرض اي شي و فيها أكثر من حقل تكسك بوكس بلاضافة الى كومبوبوكس و فيه زر لما يخلص اليوزر ادخال البيانات يضغط زر اضافة البيانات زر اضافة البيانات لازم يتاكد ان اليوزر ما نسى او ترك اي حقل موجود فارغ و بعدين يدخل البيانات في القاعدة المهم اذا دخلت سجل واحد كل شي اوكي لكن بعد سجلين ثلاث سجلات يصير العكس الكود ما يتاكد من ان ما في اي حقل فارع احيانا يدخل بيانات ناقصة و احيانا ما يسوي اي شي ولما تغير ادخال البيانات ما يتاكد من كل حقل انه مش فارغ اريد اعرف شو المشكلة في الكود انا كتبت if is null لكل حقل علشان ما يكون فاضي بالاضافة الى is numeric للارقام ارفقت كل شي بالمرفقات ساعدوني جزاكم الله الف خير db5.zip رابط هذا التعليق شارك More sharing options...
أفضل إجابة بركان قام بنشر يناير 8, 2008 الكاتب أفضل إجابة مشاركة قام بنشر يناير 8, 2008 لقيت هذا الكود في احد المواقع الاجنبية يعمل لوب على كل كنترول موجود على الفروم و اذا مربع نص يتاكد منه انه مش فاضي اعتقد راح ينفع Dim ctl As Control For Each ctl In Controls If TypeOf ctl Is TextBox Or ComboBox Then If Len(Nz(ctl.Value)) = 0 Then MsgBox "please enter data " & ctl.name Exit For End If End If Next ctl For Each ctl In Controls If TypeOf ctl Is ComboBox Then If Len(Nz(ctl.Value)) = 0 Then MsgBox "please enter data " & ctl.name Exit For End If End If Next ctl اذا احد عنده افكار ثانية ياليت يعلمنا رابط هذا التعليق شارك More sharing options...
أبا عمر قام بنشر أبريل 5, 2014 مشاركة قام بنشر أبريل 5, 2014 يُنقل ... رابط هذا التعليق شارك More sharing options...
الردود الموصى بها
من فضلك سجل دخول لتتمكن من التعليق
ستتمكن من اضافه تعليقات بعد التسجيل
سجل دخولك الان