![]() |
|
حفظ معلومات الزر - نسخة قابلة للطباعة +- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (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=26447) الصفحات:
1
2
|
حفظ معلومات الزر - bidaya - 11-09-18 السلام عليكم
هل يمكن حفظ معلومات الزر في String
اي اسمه والوظيفة التي يأديها
مثال عندنا زر بهذا الشكل
كود : Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.ClickRE: حفظ معلومات الزر - ابراهيم ايبو - 11-09-18 السلام عليكم اخي الكريم الامر متوقف على كيفية ومكان الحفظ 1- يمكن كتابة وظيفة الزر واسمه كـ comment 2 - يمكنك كتابة اسماء الازرار ووظائفها في ملف text يرفق بالمشروع 3 - يمكنك حفظ اسماء الازرار ووظائفها في ملف في قاعدة بيانات 4 - يمكنك حفظ اسماء الازرار ووظائفها في ملف الـ help الامر بسيط والاختيار لك RE: حفظ معلومات الزر - 911 - 11-09-18 ضع مثال لما تريد أن يكون داخل String ليتضح المطلوب أكثر RE: حفظ معلومات الزر - bidaya - 11-09-18 شكرا لكم
انا قصدي كالتالي
مثال
كود : Dim bidaya As Stringهل يمكن حفظ اسم ووظيفة الزر في bidaya
اي ان bidaya يعتبر String
شكرا لكم وان كان هناك فكرة مشابهة افيدونا
RE: حفظ معلومات الزر - elgokr - 12-09-18 وعليكم السلام ورحمة الله وبركاته
اهلاً بك اخى bidaya
تفضل اخى المثال يوضح كيفية الاستخدامكود : Private bidaya As Stringالان يمكنك استخدام جملة PHP كود : bidaya لتمريرها داخل اى حدث اخر ليقوم بتنفيذ القيمة التى بداخلها مثل كود : Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Clickتحياتى لك
وتمنياتى لك التوفيق
RE: حفظ معلومات الزر - bidaya - 12-09-18 (12-09-18, 07:32 AM)elgokr كتب : في هذه الحالة اخي TextBox يحمل فقط hh الي هياقيمة bidaya انا اريد حفظ كامل المعلومات اي الاسم والوظيفة؟ وان كانت هناك طريقة اخرى فهذا جيد وشكرا RE: حفظ معلومات الزر - bidaya - 12-09-18 ربما تكون الفكرة غير واضحة للاخوان
انا عندي عدة ازرار في البرنامج
وعندي هذا الشرط في البرنامج
كود : If txt10 = "anes" Thenاريد اختصار الامر كل مرة اعمل كود : Button2.Enabled = FalseRE: حفظ معلومات الزر - elgokr - 12-09-18 اهلاً بك اخى bidaya
لاتمام هذا كل ما عليك فعله التالى
قم باستخدام هذا الـ Subكود : Sub RunText(ByRef Bt As Button, ByVal Text As String)وتعال فى المكان المراد تنفيذ الـ Sub وطبق الكود التالى كود : RunText(Button1, "Thank you")اتمنى ان يكون الكود بسيط لك
وانك قادر على التعامل معه
تحياتى لك
وتمنياتى لك التوفيق
RE: حفظ معلومات الزر - bidaya - 12-09-18 (12-09-18, 09:39 PM)elgokr كتب : اجل اخي الكريم هو كود جميل
لكن لمذا نكتب في المكان المراد تنفيذ الSub
RunText(Button1, "Thank you")
لمذا لم يتم ادخال كلمة
"Thank you"
داخل ال Sub
هذا افظل
اي بهذا الشكل
كود : Sub RunText(ByRef Bt As Button)كود : RunText(Button1)RE: حفظ معلومات الزر - mmali127 - 13-09-18 السلام عليكم ورحمه الله وبركاته تحية غالية لكل اعضاء و مشرفى المنتدى الكرام اخى انطر الى المرفق التالى (مثال اعدته لك الان ) [attachment=19466] تحياتى للجميع |