[عبدالله الصافي]

the viper كتب :ضع شرط

PHP كود :

if text1.text="" then
text1.text=0 
end if 


ويمكن وضع الكود هذا على اي تكست لاتحط له قيمة

ان شاء الله يتشغل معك الكود تمام

لو سمح لي الأخ the viper بتعديل بسيط علي الكود السابق


if text1= trim "" then
text1="0"
end if

[eng]

لاستبدال جميع الحقول الفارغة بصفر نستخدم الكود

كود :

Dim C As Control
    For Each C In Me
        If TypeOf  C Is TextBox Then
if  C.Text =trim("") then
C.Text =0
end if
end if
    Next  C

[ahmedabdelaliem]

اخي الكريم المشاكل التي تذكرها تدل على ان هذا الحقل هو حقل المفتاح الرئيسي لو كان هكذا الغي رمزالمفتاح من على هذا الحقل وقوم بعمل حقل رقم تلقائي وجعله حقل اساسي ولو الموضوع فيه مشكله بالنسبه لك ارفع مثالك للتعديل عليه

بالتوفيق

[pho24u]

eng كتب :ضع الكود التالي في زر الحفظ اول سطر

كود :

On Error Resume Next

مشكور أخوي eng تم حل المشكلة يعطيك العافية ماقصرت