برقراری یک شرط در یوزر فرم اکسس

[sajad2000]

سلام به دوستان و اساتيد گرامي انجمن
من يه فرم دارم به سه تكس با كس ميخام يه دستور شرطي بنويسم كه هرگاه تكس 1 مساوي صفر بود تكس 2 رو بهم بده در غير اينصورت تكس يك باشه و اينكه اگر در هر دو تكس عدد بود اون دو تكس رو با هم جمع كند
لطفا يك فايل نمونه برام قرار بديد
مرسي

[mahan77]

اگر درست منظورتونو متوجه شده باشم این فایلش

[sajad2000]

براي اكسس دوست گرامي

[mahan77]

باشه . فقط شرط هارو درست متوجه نشدم

[sajad2000]

من دو تا تكس با كس دارم در اكسس و يك نتيجه حال مي خام اگر در تكس يك 0 و در تكس دوم عدد بود در نتيجه تكسي كه عدد هست رو نشود ده يعني دو و اگر در هر دو عدد بود و صفر نبود اونا را با هم جمع كنه

[~M*E*H*D*I~]

سلام به دوستان و اساتيد گرامي انجمن
من يه فرم دارم به سه تكس با كس ميخام يه دستور شرطي بنويسم كه هرگاه تكس 1 مساوي صفر بود تكس 2 رو بهم بده در غير اينصورت تكس يك باشه و اينكه اگر در هر دو تكس عدد بود اون دو تكس رو با هم جمع كند
لطفا يك فايل نمونه برام قرار بديد
مرسي

اگر تکست باکس یک مقدار 0 گرفت تکست باکس 2 چه چیزی رو نشون بده

اگر مقادیر تکست باکس های 1 و 2 غیر صفر بود مجموع رو در تکست باکس 3 نمایش بده؟

[sajad2000]

دوست گرامي منظور از تكس 3 همون نتيجه است و فرمول شرطي هم براي تكس سه ميخام
من ميخام براساس تكس يك و دو نتيجه در تكس سه به من بده

[~M*E*H*D*I~]

دوست گرامي منظور از تكس 3 همون نتيجه است و فرمول شرطي هم براي تكس سه ميخام
من ميخام براساس تكس يك و دو نتيجه در تكس سه به من بده

خب اینکه کاری نداره برای تکس سوم فرمول بذارید جمع دو تکس اول وقتی اولی صفر باشه خب قاعدتا مقدار دومی نشون داده میشه

[~M*E*H*D*I~]

از کد زیر میتونی استفاده کنی



Private Sub Text2_AfterUpdate()
If Text1.Value = 0 Then
Text3.Value = Text2.Value
Else
Text3.Value = Val(Text1.Value) + Val(Text2.Value)
End If
End Sub