منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب
[VB.NET] ليس علي درايه بكود بسيط جدااا - نسخة قابلة للطباعة

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183)
+--- الموضوع : [VB.NET] ليس علي درايه بكود بسيط جدااا (/showthread.php?tid=30868)

الصفحات: 1 2


RE: ليس علي درايه بكود بسيط جدااا - سعود - 14-08-19

(14-08-19, 07:15 AM)bakriano30@yahoo.com كتب :
(14-08-19, 06:53 AM)سعود كتب :
PHP كود :
 If p1.Visible True And p2.Visible True Then
            MsgBox
("Yes"MsgBoxStyle.OkOnly"")
 
       Else
            MsgBox
("NO"MsgBoxStyle.Critical"")
 
       E 
هل هذا الكود ينفع استخدم فيه اكثر من امر بأستخدام كلمه اند قبل كل امر ؟

ما ادري والله على حسب.


RE: ليس علي درايه بكود بسيط جدااا - اسامه الهرماوي - 14-08-19

نعم فا (And) تعني تنيفذ أكثر من أمر أما (or) تعني اذا كان الامر كذا او كذا فنفذ التالي.


RE: ليس علي درايه بكود بسيط جدااا - viv - 16-08-19

ملاحظة على الماشي
الى جانب انك تستطيع ان تستخدم اكثر من اداة صورة او غيرها بحال كان المطلوب ان تكون قيمتها True لست في حاجة الى كتابة ذلك

كود :
PictureBox2.Visible=true

هذا ايضا يفي بالغرض

كود :
If (PictureBox1.Visible) And (PictureBox2.Visible) And (PictureBox3.Visible) And (PictureBox4.Visible) Then

           MsgBox("Yes", MsgBoxStyle.OkOnly, "")
       Else
           MsgBox("NO", MsgBoxStyle.Critical, "")

       End If



RE: ليس علي درايه بكود بسيط جدااا - Beginer - 16-08-19

يبدو أنك تستخدم أكثر من أداة PictureBox فوق بعضها وكل واحدة منها تحتوي صورة تدل على حالة مثل (متصل)-(غير متصل)-(جاري الاتصال)-(.....)،
إن كان كذلك فيكفي استخدام أداة PictureBox واحدة وضع مجموعة الصور في الريسورس ثم قم بتغيير الصورة حسب الحالة هكذا
PHP كود :
if state=1 then
  picturebox1
.image=my.resources.st1
elseif state=2 then
  picturebox1
.image=my.resources.st2
else
  picturebox1.image=my.resources.st3
end 
if