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

نسخة كاملة : كيف اعمل فورمين ( (form (2) ) جمب بعض
أنت حالياً تتصفح نسخة خفيفة من المنتدى . مشاهدة نسخة كاملة مع جميع الأشكال الجمالية .
شباب
انا عايز بس اعرف
ازاى اعمل فورمين ( (form (2) ) جمب بعض
حولت كتير بس معرفتش

زى مثلا كدا فى برنامج team viewer




ارجو حل المشكلة لانى محتاج احلها بسرعة هه
تقدر تئول شغلى متوقف عليها Sad Angry
في حيلة استخدمها ستلبي بالغرض

ممكن يكون في طريقة قاطعه لاكن جرب هذي الحيلة

في Form1 عرف مصفوفه عباره عن صفين ضعها تحت Public Class Form1
واجعله عام أنظر للكود التالي
PHP كود :
Public N(1) As Integer 

الان في Form1 في حدث LocationChanged ضع هذا الكود
PHP كود :
N(0) = Me.Left
N
(1) = Me.Top 

كذا خلصنا من الفورم الأول
نروح للفورم الثاني

في Form2 ضع أداة الوقت Timer1 ومن خصائصة أجعل خاصية Enabled تساوي True و خاصية Interval تساوي 1

الان أدخل للكود Timer1 في حدث Tick وضع هذا الكود
PHP كود :
Me.Left Form1.N(0) + Form1.Width
Me
.Top Form1.N(1

الان جرب البرنامج Rolleyes
اسحب Form1 بتلقى Form2 يجري وراه Tongue

لا تسنى تستدعي Form2 من Form1 بالكود التالي
PHP كود :
Form2.Show() 

هذا الكود كااااااامل للـ Form1
PHP كود :
Public Class Form1
    
Public N(1) As Integer

    
Private Sub Form1_LocationChanged(sender As ObjectAs System.EventArgsHandles Me.LocationChanged
        N
(0) = Me.Left
        N
(1) = Me.Top

    End Sub

    
Private Sub Button1_Click(sender As System.ObjectAs System.EventArgsHandles Button1.Click
        Form2
.Show()

    
End Sub

End 
Class 

وهذا الكود كاااااامل للـ Form2
PHP كود :
Public Class Form2

    
Private Sub Timer1_Tick(sender As System.ObjectAs System.EventArgsHandles Timer1.Tick

        Me
.Left Form1.N(0) + Form1.Width
        Me
.Top Form1.N(1)
    
End Sub

End 
Class 

بالتوفيق
ِشكرااااااااااااااااااااااااااا ليك
Heart Heart Heart Heart

طريقتك حلوا جدا وممتازا
Heart Smile
السلام عليكم

جرب هذا المثال فيه طلبك