[hikmat]

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

[silverlight]

هذه دالة تصلح ببإستخدام مع أي كونترول و تصلح مع الفورم أيضا

PHP كود :

  Public Function GetWindowText(hwnd As IntPtr) As String
        If hwnd <> IntPtr.Zero Then
            Dim ctrl As Control = TryCast(Control.FromHandle(hwnd), Control)
            Return ctrl.Invoke(New Func(Of String)(Function() ctrl.Text))
        End If
        Return String.Empty
    End Function 


فقط مرر Handle الصحيح لها
مثال مع الفورم

PHP كود :

Dim s as String = GetWindowText(Me.Handle)