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

الصفحات : 1 2

السلام عليكم اخوانى الكريم

هل يمكننى اضافة اكثر من tag عند اضافة زر بمعنى اذا كان لدى صنف وله سعر استخدم ال button.tag لاضافة السعر او اى شى محدد ماذا لو اردت ان اضيف اكتر من سعر للصنف الواحد هل يوجد ما يشابة بالتاج او ماهو الحل واتمنى ان تكون وضحت الامور وشكرا

ال tag على حد علمي تأخد كائن من النوع object وبالتالي يمكن ان تسند له List(of double) مثلا بدلا من double

كود :

 Dim list1 As New List(Of Double)({2.1, 3.4, 3.5, 7.7})

        Button1.Tag = list1

وعند الحاجة اليها في مكان اخر في الكلاس يمكنك استخدام DirectCast :

كود :

 Dim list1 = DirectCast(Button1.Tag, List(Of Double))

        MsgBox(list1(2))

وكل عام وانت بخير

او يمكن ان يضيف خاصية جديدة للزر مثلا باركود و يضع بها رقم الباركود الخاص بالسلعة و هو افضل و اسهل .

(30-07-20, 06:39 PM)Anas Mahmoud كتب : [ -> ]ال tag على حد علمي تأخد كائن من النوع object وبالتالي يمكن ان تسند له List(of double) مثلا بدلا من double

كود :

Dim list1 As New List(Of Double)({2.1, 3.4, 3.5, 7.7}) Button1.Tag = list1

وعند الحاجة اليها في مكان اخر في الكلاس يمكنك استخدام DirectCast :

كود :

Dim list1 = DirectCast(Button1.Tag, List(Of Double)) MsgBox(list1(2))

وكل عام وانت بخير

هل يوجد طريقة اخرى؟

كود :

1. Project > Add Class:

Public Class XButton

    Inherits Button

    Property Tag1 As String

    Property Tag2 As String

    Property Price1 As Double

    Property Price2 As Double

End Class

2. Debug > Build WindowsApplication1

3. Toolbox > WindowsApplication1 Components > XButton

(04-08-20, 12:49 AM)عيد مبارك كتب : [ -> ]

كود :

1. Project > Add Class: Public Class XButton Inherits Button Property Tag1 As String Property Tag2 As String Property Price1 As Double Property Price2 As Double End Class 2. Debug > Build WindowsApplication1 3. Toolbox > WindowsApplication1 Components > XButton

فكره رائعة فعلا
احييك بشدة

يا جماعة فى حدث اضافة ال button نفسو بقوم بجلب الصنف نفسو من خلال رقم الصنف وبيكون عند اضافة الزر ال button.name بيكون هو رقم الصنف لان الرقم لا يتكرر وال button.text هو اسم الصنف نفس وسعر الصنف اعطيت له button.tag

فسؤالى هنا انا لو عايز اضيف سعر تانى ماذا افعل؟
هل يوجد ما هو بديل للتاج ؟

(04-08-20, 02:28 AM)mostafa nada كتب : [ -> ]يا جماعة فى حدث اضافة ال button نفسو بقوم بجلب الصنف نفسو من خلال رقم الصنف وبيكون عند اضافة الزر ال button.name بيكون هو رقم الصنف لان الرقم لا يتكرر وال button.text هو اسم الصنف نفس وسعر الصنف اعطيت له button.tag

فسؤالى هنا انا لو عايز اضيف سعر تانى ماذا افعل؟
هل يوجد ما هو بديل للتاج ؟

طيب فرضا فيه طريقة عشان نحط اكتر من سعر في ال button الواحد اللي بيمثل صنف واحد ، هتعرف منين المستخدم عاوز انهي سعر ؟
عاوز المستخدم ياخد انهي سعر بناء على ايه
بناء على اجابتك نفكر صح ان شاء الله

(04-08-20, 02:58 AM)Anas Mahmoud كتب : [ -> ]
(04-08-20, 02:28 AM)mostafa nada كتب : [ -> ]يا جماعة فى حدث اضافة ال button نفسو بقوم بجلب الصنف نفسو من خلال رقم الصنف وبيكون عند اضافة الزر ال button.name بيكون هو رقم الصنف لان الرقم لا يتكرر وال button.text هو اسم الصنف نفس وسعر الصنف اعطيت له button.tag

فسؤالى هنا انا لو عايز اضيف سعر تانى ماذا افعل؟
هل يوجد ما هو بديل للتاج ؟

طيب فرضا فيه طريقة عشان نحط اكتر من سعر في ال button الواحد اللي بيمثل صنف واحد ، هتعرف منين المستخدم عاوز انهي سعر ؟
عاوز المستخدم ياخد انهي سعر بناء على ايه
بناء على اجابتك نفكر صح ان شاء الله

اخى الكريم .. الاول هو عند اضافة الزر وعند الضغط على الزر بيتم عملpass للبيانات اللى انا ذاكرتها من قبل فى داتا جريد فيو

وبردو عشان حضرتك تبقى فهمنى انا عندى صنف ومع عمل حدث اضافة ال button بحتاج امرر ٣ بيانات مهمة للداتا جريد فيو وهى رقم الصنف بياخد ال button.name واسم الصنف بياخد button.text وسعر الصنف اعطيت له button.tag

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

فارجو ان يكون وضحت الامور لك يا اخى الكريم
ماذا لو اردت ان اضيف سعر او مش شرط سعر اى بيان اخر ماذا افعل؟

كود :

Dim b As New XButton

b.Tag1 = "Name"

b.Tag2 = "Description"

b.Price1 = 123

b.Price2 = 123.45

الصفحات : 1 2