منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب > قسم لغة الفيجوال بيسك VB.NET > قسم اسئلة VB.NET > كيف ادمج جملتين شرطيتين بجملة واحدة بحيث لا يتم تجاهل الاولى
نسخة كاملة : كيف ادمج جملتين شرطيتين بجملة واحدة بحيث لا يتم تجاهل الاولى
أنت حالياً تتصفح نسخة خفيفة من المنتدى . مشاهدة نسخة كاملة مع جميع الأشكال الجمالية .

سعود

29-09-13, 02:29 PM
اخواني السلام عليكم ورحمة الله وبركاته


تعبت من التعامل مع التاريخ والوقت لكن قلت لازم انهي القصيدة قدر المستطاع.

المطلوب اخواني اخواتي التعديل على الجملتين التاليتين بحيث تكونا بجملة واحدة ولا يتم تجاهل نتيجة على حساب اخرى

كود :
If (thlastdate + thlasttime) > (tblastdate + tblasttime) Then
                Image1.ImageUrl = "~/mgs/on.png"
            Else
                Image1.ImageUrl = "~/mgs/off.png"

            End If

            If (rdlastdate + rdlasttime) > (tblastdate + tblasttime) Then
                Image1.ImageUrl = "~/mgs/on.png"
            Else
                Image1.ImageUrl = "~/mgs/off.png"

            End If
منتظركووووووووووووووووووومSmile

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

29-09-13, 02:58 PM
اضف AND او OR بين الجملتين ليتم الربط بينهم

abulayth

29-09-13, 02:59 PM
السلام عليكم
كود :
If (thlastdate + thlasttime) > (tblastdate + tblasttime) or  (rdlastdate + rdlasttime) > (tblastdate + tblasttime) Then
                Image1.ImageUrl = "~/mgs/on.png"
            Else
                Image1.ImageUrl = "~/mgs/off.png"
end if

يعطيك العافية

sooriaty03

29-09-13, 03:42 PM
السلام عليكم ورحمة الله وبركاته

ما دام أنك تريد اعتماد النتيجتين فإذا تحقق أحدهما ولم يتحقق الآخر فالنتيجة النهائية ستكون خاطئة ...
فيجب إذن استخدام And أو AndAlso

وبالتالي سيصبح الكود:

إقتباس : If (thlastdate + thlasttime) > (tblastdate + tblasttime) AndAlso (rdlastdate + rdlasttime) > (tblastdate + tblasttime) Then
Image1.ImageUrl = "~/mgs/on.png"
Else
Image1.ImageUrl = "~/mgs/off.png"

End If


بالتوفيق

سعود

29-09-13, 10:28 PM
تم اعتماد عمود واحد لياخذ التاريخ والوقت معا
كود :
If thlasttime > tblasttime Or rdlasttime > tblasttime Then
                Image1.ImageUrl = "~/mgs/on.png"
            Else
                Image1.ImageUrl = "~/mgs/off.png"
            End If

الذي اريده من الكود انه لو وجد تاريخا ووقتا احدث من تاريخ ووقت خروج العضو يعضي صورة خضراء on.png
يعني لو لم يوجد موضوع جديد لكنه يوجد رد جديد اريد ان ايقونة المنتدى تكون خضراء
فهل الكود صحيح؟
مع اني لم الحظ الناتج كما اريد
منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب > قسم لغة الفيجوال بيسك VB.NET > قسم اسئلة VB.NET > كيف ادمج جملتين شرطيتين بجملة واحدة بحيث لا يتم تجاهل الاولى