پرسش خطا در اجرای تابع

[reza_1001]

سلام خدمت همه دوستان

در فایل پیوستی توضیحات کامل دادم

یه تابعی نوشتم ولی متاسفانه در حالتهای غیرعادی درست عمل نمیکنه .

[iranweld]

با سلام

این کد را تست کنید

Public Function ammm(a, b, c)
    If b > a And b < c And a < 360 And b < 360 And c < 360 Then

    ammm = 1

    Else

    ammm = 0

    End If

    End Function 

[reza_1001]

دوست عزیز این تابع شما دقیقا همون کاری که تابع من میکنه انجام میده یعنی زمانی که همه اعداد کمتر از 360 هستند رو محاسبه میکنه ولی وقتی یکی یا دوتا از اعداد کمتر از 360 و دیگری دور جدیدی رو شروع کرده محاسبه نمیکنه

نکته مهم : در فایل پیوستی این نکته روننوشتم که در حالتهای غیر عادی هم باید خروجی 1 بشه نه 0 .

در حالتهای غیر عادی یه بار دوتا از اعداد کمتر از 360 هستند و یه بار دوتا از اعداد دور جدیدی رو شروع کرده اند