منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب
[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=53195)

بوتن - EMADW - 18-05-25

عندي مجموعة من ازرار البوتن عم اقدر غير اسماء التكست الخاصة بكل زر عن طريق قاعدة بيانات اكسس ضمنها رول كأن يكون اسم الزر الاول سكر مثلا اغيره لشاي لكن كيف استطيع نفس الزر يكون له وظيفة ثانية يدخلني لسعر كيلو السكر مثلا
مثلا بوتن 1 عند الضغط عليه تضهر رسالة لتغير اسم التكست الخاص به شاي بدل سكر مثلا
كيف بقدر اجعل لزر بوتن 1 عمل اخر بالاضافة للاول

RE: بوتن - Taha Okla - 18-05-25

ضع مربع اختيار على النافذة التحديد فيها يعني التحرير وعدم التحديد يكون التنفيذ ..

ثم اكتب الكود في الزر كما التالي :
كود :
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
   If CheckBox1.Checked = True Then
       ' كود التغيير
   Else
       ' كود التنفيذ
   End If
End Sub

يكون للزر أكثر من اسم في نفس اللحظة وامكانية التغيير من قبل المستخدم شغلة مش مريحة، 
ولكن ان كنت تراه مناسباً  فالكود أعلاه يفي بالغرض..