你说的是MDI窗体吗?你在子窗体的load事件中,用left和top定位:
(假设你的MDI窗体名为MDIForm1)假设你想把子窗体定位在父窗体的中间:
form1.left = MDIForm1.ScaleWidth/2-form1.width/2
form1.top=MDIForm1.ScaleHeight/2 - form1.Height/2当然这并不能保证父窗体的客户区足够大。如果要根据子窗体的大小来决定是否增大父窗体的大小,设置MDIForm1d的width和height属性就可以了

解决方案 »

  1.   

    要实现你说的效果要用到API函数SetParent
    Private Declare Function SetParent Lib "user32" Alias "SetParent" (ByVal hWndChild As Long, ByVal hWndNewParent As Long) As Long在MDI窗体右边放上一个Picturebox,
    dim mhwnd as long
    mhwnd = SetParent ( form1.hwnd , pic.hwnd) 'form1是子窗体,Pic是Picturebox
      

  2.   

    这种很危险,要小心,最后程序结束时要还原。
    SetParent form1.hwnd ,mhwnd 'mhwnd就时刚才的返回值。