[أبو عبدالله الحلواني]

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

[سعود]

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

PHP كود :

Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click
        Dim frm As New Form
        frm.StartPosition = FormStartPosition.Manual
        frm.Size = New Size(222, 111)
        Dim fx As Integer = MousePosition.X
        Dim fy As Integer = MousePosition.Y
        frm.Location = New Point((fx - Button1.Left), (fy - frm.Height))
        frm.Show()
    End Sub 


[احمد 2021]

اولا بتضيف الاكواد لحدث لواد او بوتن فتح الفورم الجديد 

كود :

Dim x As Integer
Dim y As Integer
Me.StartPosition = FormStartPosition.Manual
' x = Screen.PrimaryScreen.WorkingArea.Width - Me.Width
       y = Screen.PrimaryScreen.WorkingArea.Height - Me.Height
       Me.Location = New Point(x, y)

[أبو عبدالله الحلواني]

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

كود :

       ChangPassFrm.StartPosition = FormStartPosition.Manual
       ChangPassFrm.Location = New Point((MousePosition.X - (ChangPassFrm.Width / 2)),  _
(MousePosition.Y - ChangPassFrm.Height))


       ChangPassFrm.Show()

استاذ سعود وأستاذ أحمد بارك الله لكم وجزاكم عنا خيرا