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

نسخة كاملة : اظهار محتوى البوتون
أنت حالياً تتصفح نسخة خفيفة من المنتدى . مشاهدة نسخة كاملة مع جميع الأشكال الجمالية .
الصفحات : 1 2
السلام عليكم و رحمة الله
عندي مجموعة بوتون حوالي 26 بوتون ,, في كل بوتون سأضع صوره .. وكلها ع فروم واحد
كيف يمكن لي ترتيبها و برمجتها بحيث بظهور الثاني يتخفي الاول و هكذا حتى النهايه ؟

سوال اخر ..

اريد ان اضع منيو ستريب .. يحتوي ع فايل و داخل الفايل يوجد Exit ..
كيف افعل االـ Exit بأنه بالضغط عليه يقفل البرنامج ككل ؟
وكذلك اذا اردت وضع تعليمات مثلا

و شكرا
السلام عليكم ورحمة الله
بالنسبة للسؤال الاول ما الحدث الذي سيقوم باظهر زر او اخفائه
هل تقصد عند الضغط علي Button1 يختفي ويظهر Button2 حتي النهاية

السؤال الثاني غير واضح

ولو امكن عند التوضيح تسمي الادوات بالاسماء الانجليزية مثال بدل بوتون افضل يكون Button
The first question:
I think this code will do the job
Mark property "Visible" is equal to "False" for all buttons except button 1
(In screen design)
In the Click event code, type in the following manner
كود :
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Me.Button1.Visible = False
Me.Button2.Visible = True
End Sub

Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
Me.Button2.Visible = False
Me.Button3.Visible = True
End Sub

'And so on ...

RolleyesRolleyesRolleyes

(05-12-13, 11:40 PM)بنت ماما كتب : [ -> ]سوال اخر ..

اريد ان اضع منيو ستريب .. يحتوي ع فايل و داخل الفايل يوجد Exit ..
كيف افعل االـ Exit بأنه بالضغط عليه يقفل البرنامج ككل ؟
وكذلك اذا اردت وضع تعليمات مثلا

و شكرا

I understand that you want something like that


كود :
Private Sub ExitToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ExitToolStripMenuItem.Click
        'SAVE SETTINGS IF FOUNDED
        My.Settings.Save()
        'CLOSE PRO.
        End
    End Sub

RolleyesRolleyesRolleyes
^

Thanks a lot for your advice

that will be help him for do so many functions

regardsHeart
توضيح لسوالي الاول بالنسبه للـ button

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

الكود اللي تم اضافته يخفي لي الـ button و ليس محتواه ..

بالنسبه


كل اللي ابغاه انه يقفل لي البرنامج ككل بمجرد الضغط على Exit

اتمنى اني اكون وضحت طلبي اكثر Sad
السلام عليكم
ههه حلو الانجليزي اه ظنيت المنتدي غلط

الاجابة للاخ او الاخت صاحبت السؤال

ضعي كل الصور في الريسورس واليك الطريقة
اتبع الخطواط

الخطوة الاولي


الخطوة الثانية


الخطوة الثالثة


الان يمكنك اضافة الصور باكثر من طريق يمكن الذهاب الي مجلد الصور وتحديد كل الصور ثم بالضغط مع السحب الي المساحة البيضاء التي ظهرت امامك الان

وممكن عن طريق البرنامج شاهد الصورة


الان مبروك الصور اصبحت مدمجة داخل البرنامج

الان طريقة استخدام الصور وعرضا في البرنامج

اذهب الي زر واضغط عليه ضغطا مذدوجا سيذهب بك الي ساحة الكود الخاصة به

مثلآ انت الان تريد عرض الصورة في الكائن PictureBox1 اذن سيكون الكود كاالتالي

Me.PictureBox2.Image = My.Resources.www

طبعا مع تغير www الي اسم الصورة انت بمجرد كتابة My.Resources. ستظهر لك كل الصور التي تم اضافتها

-----------------------

بالنسبة للجزء الثاني وهو اغلاق البرنامج سهل
اضغط ضغطا مذدوجا علي زر الخروج وضع فيه الكود

كود :
Me.Close()

اتمني الاستفادة
شكرا اخوي ع الشرح و جربتها و طلعت تمام Smile
معليش ممكن تساعدوني ف الصور Sad
اضفت الازره و الـ PictureBox و كله زي شرح الاخ Sad
والصور جات هنا Sad

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


اش الحل Sad Sad Sad
لم أقرأ الموضوع لكن رداً على الرد الأخير

استبدلي
كود :
Me.PictureBox2 = My.Resources.a
استبدليها بـ
كود :
Me.PictureBox2.Image = My.Resources.a

و كذلك مع الـريسورس b
:/
شكرا لك .. واسفه ماانتبهت للي كتبه الاخ قبل :/
الصفحات : 1 2