اريد كود يلاحق الماوس

وعليكم السلام

اقتباس

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

اختي جربي الكود التالي:

        Static a As Integer
        Select Case a
            Case 0
                PictureBox1.Visible = True
                PictureBox2.Visible = False
                PictureBox3.Visible = False
                PictureBox4.Visible = False
                a = 1
            Case 1
                PictureBox3.Visible = True
                PictureBox2.Visible = False
                PictureBox1.Visible = False
                PictureBox4.Visible = False
                a = 2
            Case 2
                PictureBox4.Visible = True
                PictureBox2.Visible = False
                PictureBox1.Visible = False
                PictureBox3.Visible = False
                a = 3
            Case 3
                PictureBox2.Visible = True
                PictureBox3.Visible = False
                PictureBox1.Visible = False
                PictureBox4.Visible = False
                a = 0
        End Select

مشكور اخوي

هل لديكم معلومه حول جعل خاصية label شفافه بدون اي لون؟

او ارغام GroupBox يكون كخلفية الفورم صوره مثلا؟

هذا الكود يرسم كرة تتبع الماوس

Private Sub Form_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
Me.Cls
Circle (X, Y), 100, vbRed
End Sub

:rolleyes:

لجعل خاصية label شفافة

Label1.BackColor = Color.Transparent

والله أجل وأعلم

اهلين اخواني

الف شكر ع الرد

لكن للأسف ولاواحد ضبط

اوكيه بالفورم الثاني تمام واصبحت شفافه

لكن لما وضعتها بالفورم الاول لم يطبق :blink: يعني تأخذ لون الفورم الاساسي

بينما انا اريد الخلفيه صوره

فيكف اضبطه

وياليت لو احد يعرف كود لضبط الاعداد الزوجيه

WindowsApplication2.zip

جاتني فكره جعل الصوره كمسار لكن شو الكود المناسب؟

أخواني الأعزاء

أنا مبرمج صغير ولدي مشروع يتكون من الصفحة الإفتتاحية ويوجد بها زر يذهب عند الضغط عليه إلى الرئيسية:

1-أريدعند فتح المشروع يعمل على عمل تحميل أولاًللصفحة يكون هناك الشريط للتحميل(loading)""يمكن يكون السبلنق خطأ.بس هذا المطلوب.

2-أريد لما أضغط للذهاب إلى الفورما الرئيسية يعمل تلاشي أو أي حركة جديدة للفورما الأولى(الأفتتاحية).

مرحبا انا اطلعت على مثالك المرفق

حابة اوضح لك شغلة لنفرض ان خلفية الفورم كانت صورة و وضعت عليها label or groupbox

فمن الممكن جعلها شفاف اما لو كانت الصورة موضوعة في picturebox ثم وضعت عليها

label or groupbox مش ممكن جعلها شفاف لأنها اداة فوق اداة مش ادوات على الفورم

اتمنى وضح لك المعنى ؟؟

ملاحظة :

انا في بعض الأحيان اعمل صورة فيها دائرة بلون معين مثلا رمادي والخلفية ازرق ثم اجعل هذة الصورة

هي خلفية الفورم backgroundimage

ثم اضع label شفاف فوق الدائرة المرسومة واكتب نص معين ...نوع من التحايل حتى احصل على

زر على شكل دائرة ....هذا مثال بسيط لك منة انطلقي لأفكار ابداعية

Label1.BackColor = Color.Transparent

groupbox1.BackColor = Color.Transparent

اما بالنسبة عند الضغط على زر تظهر لك عدة صور ؟؟؟؟

بصراحة مافهمت مقصدك لمى اطلعت على المثال المرفق لقيت عندك فقط picturebox واحد فقط

هل رايدة عند الضغط على زر

يتم عرض صورة في picturebox1 ..حيث عند كل نقر تتغير الصورة ؟

او مثلا عندك picturebox1 - picturebox2 - picturebox3

وعند كل نقر تتغير الصور فيها ؟

ممكن توضحي وش كنت رايدة بالضبط

ياريت مثال تعملية

سألتي عن الأعداد الزوجية

راح افرض انت رايدة عن النقر على زر الأعداد الزوجية راح تتحمل في combobox

الأعداد الزوجية من 0 الى 100

في حدث النقر على الزر

dim X,Y as integer

X=2*y

for Y=0 to Y=50

combobox1.items.add(x)

loop

ايضا انت ممكن جعل groupbox خلفية صورة

groupbox1.backgroubimage=image.fromfile

ثم اكتبي مسار الصورة

او من الخصائص

في الأخير سؤال اذا ممكن هل انت طالبة في معهد العالمية ؟

موفقة

بالنسبة لـ lofe

اطلع على هذة المشاركة

/index.php?showtopic=62987