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

السلام عليكم
بعد محاولات قررتُ الدخول لعالم الدوت نت، وأنا الآن أمشي مشى السلحفاة رويداً رويداً حتى اصل
تعبتُ قليلاً ، ولكن الحمد لله يوماً بعد يوم يزداد حبي لهذا العالم الجميل، وإن كنتُ أعتقدهُ سابقاً معقداً
على كلٍ يدأت تواجهني بعض المشاكل اليسيرة والمعوقات الصغيرة ومنها:
- أريد طريقة ضبط مكان الفورم الأبن حسب اختيارك
بمعنى آخر:
أريد اختيار حسب ما أريد بمكان أو موقع القورم على الفورم الأب.
واعتقد بأنها (خاصية TOP)

السّلام عليكم و رحمة الله و بركاته

1 - توسيط الفورم :

كود :

      'Centrer Form

        Dim douX, douY As Double

        Dim srtX, srtY As Short

        douX = (Screen.PrimaryScreen.Bounds.Width - Me.Width) / 2

        srtX = CShort(douX)

        douY = (Screen.PrimaryScreen.Bounds.Height - Me.Height) / 2

        srtY = CShort(douY)

        Me.SetDesktopLocation(srtX, srtY)

2 - ضبط موقع الفورم الابن حسب إختياراتك ..

كود :

    'Position form

        Me.StartPosition = FormStartPosition.WindowsDefaultLocation

        Me.TopMost = True

        Me.Top = 134 ' تكبر القيمة ستنزل

        Me.Left = 155 ' تكبر القيمة سترجع لليمين

        Me.Height = 803

        Me.Width = 1525

المكان : طبعا الفورم لود

تحياتي أخي الغالي

حياك الله أخي العزيز عبد الكريم وجزاك كل خير
الكود شغال 100 %

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

مصمم هاوي

عبد العزيز البسكري

مصمم هاوي