منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب
أستفسار - نسخة قابلة للطباعة

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



أستفسار - kebboud - 22-02-23

ماذا تعني هذه العلامة !
مثلا :

If dt.Rows.Count > 0 Then
            Dim dr As DataRow
            dr = dt.Rows(0)
            Form_main.p1.Enabled = dr!p1
           
            Close()
        End If



RE: أستفسار - ابو انس - 23-02-23

ضمن vb.net فإنها من الاشارات القديمة تكاد لا ترى مبرمج يستخدمها  اما استخداماتها فمثلا
عند تعريف المتغيرات فإنها كنت تعني تعريف متغير من نوع single
dim a!=1

وفي المثال الذي ذكرته هي تعني تحديد العمود p1  ضمن الداتا تيبل الذي تم تعريفه في الكود الذي ذكرته


p1.Enabled = dr!p1
هي تعني 
p1.Enabled = dr("p1")
وايضا تعني
p1.Enabled = dr(0)       على اعتبار ان العمود p1 الموجود ضمن datatable رقمه صفر

 ولو كان الكود على الشكل التالي 
 p1.Enabled = dt.Rows(0)("p1")
فسنوفر على انفسنا عناء انشاء متغير من النوع DataRow
وسيكون الكود اكثر ملائمة مع النمط الذي يستخدمه اغلب المبرمجين

فيصبح الكود الذي ذكرته على الشكل التالي
كود :
  If dt.Rows.Count > 0 Then
           Form_main.p1.Enabled = dt(0)("p1")
end if
close



RE: أستفسار - kebboud - 23-02-23

(23-02-23, 01:47 AM)ابو انس كتب : ضمن vb.net فإنها من الاشارات القديمة تكاد لا ترى مبرمج يستخدمها  اما استخداماتها فمثلا
عند تعريف المتغيرات فإنها كنت تعني تعريف متغير من نوع single
dim a!=1

وفي المثال الذي ذكرته هي تعني تحديد العمود p1  ضمن الداتا تيبل الذي تم تعريفه في الكود الذي ذكرته


p1.Enabled = dr!p1
هي تعني 
p1.Enabled = dr("p1")
وايضا تعني
p1.Enabled = dr(0)       على اعتبار ان العمود p1 الموجود ضمن datatable رقمه صفر

 ولو كان الكود على الشكل التالي 
 p1.Enabled = dt.Rows(0)("p1")
فسنوفر على انفسنا عناء انشاء متغير من النوع DataRow
وسيكون الكود اكثر ملائمة مع النمط الذي يستخدمه اغلب المبرمجين

فيصبح الكود الذي ذكرته على الشكل التالي
كود :
  If dt.Rows.Count > 0 Then
           Form_main.p1.Enabled = dt(0)("p1")
end if
close
أشكرك أخي أبا أنس شكرا يليق بمقامكم العالي بالله