مساعدة في كود if

**Ahmed.IQ** · يونيو 30, 2016

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

لدي دالة if

المطلوب عمله من هذه الدالة تبحث عن حقل اسمة p1 اذا كانت الحقل فارغ او =0

احتاج ان لا يفعل اي شيء

اما اذا كانت الحقل يحتوي على رقم يفعل الامر بعد else

الكود كما موضح

If Me.p1 = "0" Then
Exit sub
Else
DoCmd.SetWarnings False
DoCmd.OpenQuery "UP4"
DoCmd.SetWarnings True
End If

احتاج الى وضع امر مهمته عدم عمل اي شي

**AlwaZeeR** · يونيو 30, 2016

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

If IsNull(Me.p1) Or Me.p1.Value = 0 Then
Else
DoCmd.SetWarnings False
DoCmd.OpenQuery "UP4"
DoCmd.SetWarnings True
End If

الردود الموصى بها