سؤال في الخصائص للابتعاد عن الأسئلة الروتينية - نسخة قابلة للطباعة +- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (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=26691) |
سؤال في الخصائص للابتعاد عن الأسئلة الروتينية - viv - 28-09-18 الموضوع شيق لمن يريد ان يشارك زمان من ايام فيجوال 2005 كان عندي مكتبات عن الفيجوال ستوديو وكيفية استخدام الـ Class للاسف ضاعت كلها ولم اجدها فيها طريقها لجعل الخاصية تاخذ الشكل التالي : كود : MyClass.Field("Date").Value=Now كنت قد برمجتها من كتب ضاعت اعتقد خاصية كانت تقوم بوراثة Class أخر . لاحظ وجود القيمة Value وكانت البرمجة شئ مثل كود : Public Class Class1 هذه البرمجة ستعمل بشكل طبيعي كود : Dim m As New Class1 ويمكن استدعاء القيمة المحفوظة عادي كما بالشكل التالي : كود : TextBox1.Text = m.Feild("V1").Value المشكلة لن يظهر الرقم لان اخر قيمة ادخلناها هي التاريخ والحل هو تحويل الخاصية الى مصفوفة ربما كود : Dim _Feild As New List(Of mycls) شئ مثل هذا مشكلة List تستدعي العناصر Items بالرقم وليس الاسم لو كنت اذكر ربما كان هناك بحث عن اسم العنصر بواسطة IndexOf ربما لا اتذكر . المهم المشكلة هنا انا توقفت عند هذا الباب فمن له معرفة وسبق وعملها . RE: سؤال في الخصائص للابتعاد عن الأسئلة الروتينية - elgokr - 28-09-18 مرحباً اخى viv
شوف المثال البسيط واعلم انها ستوضح لك كيفية انشاء ما تريده
بكل بساطة وبدون اى تفكير كثيراً او تعقيدات
اولا لتوضح المثال
انشاء مشروع وقم بانشاء عدد [ 1 ] TextBox
وانشاء عدد [ 1 ] Button
ثانياً طبق الاكواد والشرح كالتالي
ثم تعال فى كود الزر واستخدم التالىكود : MsgBox(test(TextBox1).Value.ToShortDateString) وتعال اسفل حدث كود الزر وقم باضافة التالى كود : Function test(ByVal text_ As Control) As DateTimePicker قم بتشغيل المشورع واكتب فى TextBox
واكتب اى تاريخ باى طريقة وليكنPHP كود : 28 9 2018 الامر مشابق للموضوع فقط حسب الحاجة المطلوبة
مررها بنفسك الطريقة كما فى مثال الـ Function بالاعلى
وسيتم المطلوب بالنهاية
اتمنى ان تكون الفكرة وصلت لك وان الامر ابسط واسهل مما تتخيل
تحياتى لك
وتمنياتى لك التوفيق
RE: سؤال في الخصائص للابتعاد عن الأسئلة الروتينية - viv - 29-09-18 ليت الامر بهذه البساطة اخ خظر احتاج ان ادخل قيم مختلفة تواريخ صور ارقام نصوص يعني النوع يكون Object ويكون اما Coolection او List هو ليس تابث بنوع معين فانا احتاج ان يكون له عدة خصائص مثلا كود : MyClass.Field("Date").Value= Now لاحظ العنصر له العديد من الخصائص Value او Count او toDate اي خصائص فيما بعد اضيفها ويجب ان تظهر للمستخدم فانا لا ابرمج شئ لنفسي يعني مصفوفة لها حصائص كل واحدة برقم فهرس او اسم ولها قيمة توصلت الى طريقة مع انها ليست التي ابحث عنها ولكنها شغالة كود : Public Class Class1 وضع قيم كود : Dim m As New Class1 الاستعلام عن قيم كود : TextBox1.Text = m.Feild("V1").Value RE: سؤال في الخصائص للابتعاد عن الأسئلة الروتينية - محمد كريّم - 29-09-18 خصائص الكائنات والتعامل معها من الكلاسات عبر الـ setters , getters هذه من أهم مميزات "البرمجة كائنية التوجه" OOP أقترح الاطلاع على هذا الشرح ل: https://www.youtube.com/watch?v=m9h3-XSmSCQ https://www.youtube.com/watch?v=0FHSDm3Tfsk RE: سؤال في الخصائص للابتعاد عن الأسئلة الروتينية - عبدالله الدوسري - 29-09-18 هذة تجربة سريعة ألق نظرة عليها : تم إستخدام الـ ( System.Collections.Generic.Dictionary ) [attachment=19684] [attachment=19685] [attachment=19686] وتستخدم بهذة الطريقة : [attachment=19687] أتمنى تكون قريبة للي تفكر فية هذا الكود : وضعت الصور لأني لا احب طريقة عرض الأكواد في المنتدى نهائياً كود : Public Class viv كود : Public Class Form2 RE: سؤال في الخصائص للابتعاد عن الأسئلة الروتينية - viv - 29-09-18 شكرا اخ الدوسري تقريبا هو المطلوب بشحمه ولحمه سادرسه |