كيف يمكن حل Null

السلام عليكم

استخدم IsNull

مثال :

على عتبار Field1 حقل ، تسطيع وضعها في حملة شرطيه .

IsNull(xxxxx!Field)

مشكور حبيبي Visitor_OM

على تجاوبك

ولكن ياليت توضح اكثر

انا رابط الاكسس بالفيجول بطريقه ال DAO

في الداتا عندي جودل واحد tb1 وفيه خمسة حقول المهم اشغل البرنامج

ما فيه مشكله بس اذا كان واحد من الحقول فاضي فانه يتوقف البرنامج لانها Null

ارجو الساعده اذا امكن ..............وشكراً

Private Sub showdata()

If t.RecordCount < 1 Then Exit Sub

Text1.Text = t!EmployeeName

Text2.Text = t!office

Text3.Text = t!home

Text4.Text = t!mobile

Text5.Text = t!EmailAddress

End Sub

السلام عليكم

تأمر أمر أخي وهذا مثال :

'

If Not IsNull(t!EmployeeName) then Text1.Text = t!EmployeeName

وطبق المثال اعلاه على الكل إن شاء الله ينجح .

اخوي

مشكور جداً :)

على تفاعلك وهتمامك

وصراحه مادري وش اقول

OnError Goto ErrMesg

YouCode here



Exit Sub

ErrMesg:

MsgBox("رسالتك التحذيرية هنا"(

بهذه الطريقة تتفادى Runtime Error ولن يتم ايقاف البرنامج

وانا اعتبر هذا الفعل فضيحة برمجية

اخوي عبد العظيم غنيم

ممكن تشرح وش الفرق

وماهيه الفضيحه :confused: