[Microformt]

(10-05-15, 05:58 AM)sami2015 كتب :

كود :

Private Declare Function SetParent Lib "user32.dll" (ByVal hWndChild As Long, ByVal hWndNewParent As Long) As Long

Private Sub Command1_Click()
   Form2.Left = 300
   Form2.Top = 300
   SetParent Form2.hWnd, Form1.hWnd
   Form2.Show
End Sub

Private Sub Form_Unload(Cancel As Integer)
   End
End Sub

اخي العزيز
 السلام عليكم ورحمة وبركاته
 اقدم لكم جزيل الشكر والتقدير عى ما تقدمه من دعم فني