الفريق العربي للبرمجةأرشيف المنتديات · 2000 – 2023
نسخة أرشيفية للقراءة فقط — التسجيل والمشاركة مغلقان، والمحتوى محفوظ كما كان.

كيف اظهار عنصر تحت عنصر اخر

بدأه mahmoud.com في 3 يناير 2014 · 2 رد · 417 مشاهدة · في لغة Ms Visual Basic 6 وما قبلها من إصدارات
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

السلام عليكم

 

              اريد اظهار Picture    تحت Command Button

 

 

 

 

مثل القوائم المسندلة

 

او قائمة ملف

#2

الحمد لله

 

 توصلت الى الكود بعد عدة محاولات

 

الكود هو  Picture3.Top = KewlButtons20.Top + KewlButtons20.Height

 

'Picture3.Left = KewlButtons20.Left - KewlButtons20.Width + 2175
Picture3.Visible = True

 

اى استفسار فى الكود انا تحت امركم

1
#3

السلام عليكم...

 

قيمتُ المشاركة لأنكَ عدتَ و قدمتَ الحل الذي توصلتَ إليه. شكراً.

 

و فقط يعض التعليقات:

 

1. لا تعتمد على استعمال الأعداد المجردة (الأعداد السحرية - Magic Numbers) مثل 2175 لأن معناها غير مفهوم. أعتقد أن ذلك العدد يمثل الفرق بين عرض الزر و عرض الـ PictureBox. من هذه الناحية أيضاً ستضطر إلى تعديل الكود إذا عدلت عرض الزر أو الـ PictureBox. في مثل هذه الحالات اسنعمل عمليات ذات صيغة عامة بحيث دائماً تعطي المطلوب.

 

2. يمكن - اختيارياً - دمج تغيير الـ Left و الـ Top معاً باستعمال الوظيفة Move للـ PicturBox:

 

أ. لمححاذاة الجانب الأيسر للـ PictureBox مع الجانب الأيسر للزر:

Picture3.Move KewlButtons20.Left, KewlButtons20.Top + KewlButtons20.Height

ب. لمحاذاة الجانب الأيمن للـ PictureBox مع الجانب الأيمن للزر:

Picture3.Move KewlButtons20.Left + KewlButtons20.Width - Picture3.Width, KewlButtons20.Top + KewlButtons20.Height

* أيٌ من الكودين السابقين لا يتأثر بتغيير حجم الزر أو الـ PictureBox

 

نرجو الاستفادة و السلام.

وَ قُلِ اعْمَلُوا فَسَيَرَى اللهُ عَمَلَكُمْ وَ رَسُولُهُ وَ الْمُؤْمِنُونَ

صدق الله العظيم

مواضيع مشابهة