VB高手请赐教！急！要多少分都可以。

Question

在mdi创体中放置一个字窗体，设置borderstyle=0 在编代码使在调整MDI窗体的时候，这个子窗体，也能随着MDI的改变而改变.在在这子窗体上放置一些picturebox or imagebox就可以了！

Answer 1

1.show后设置form1.windowstate=2或form1.setfocus

Answer 2

使用treeview+picturebox做成菜单控件

Answer 3

to: ：　ferrytang(ferry)　
我用picturebox做了个菜单,
可是别的子窗体没有显示的地方了啊!
怎么办?

Answer 4

Private Const HWND_TOPMOST = -&H1
Private Const HWND_NOTOPMOST = -&H2
Private Const SWP_NOSIZE = &H1
Private Const SWP_NOMOVE = &H2
'------------------
Private Declare Sub SetWindowPos Lib "user32" (ByVal hwnd As Long, _
    ByVal hWndInsertAfter As Long, ByVal X As Long, _
    ByVal Y As Long, ByVal cx As Long, ByVal cy As Long, _
    ByVal wFlags As Long)
    
Private Declare Function SetParent Lib "user32" (ByVal hWndChild As Long, ByVal hWndNewParent As Long) As Long
Private Declare Function SendMessage Lib "user32" Alias "SendMessageA" (ByVal hwnd As Long, ByVal wMsg As Long, ByVal wParam As Long, lParam As Any) As Long
Private Const WM_UNDO = &H304
Private Sub Form_Load()
SetParent me.hwnd, frmMaim.hwnd  'frmMain为目标窗体，即将显示在的那个窗体
Call SetWindowPos(Me.hwnd, HWND_TOPMOST, 0&, 0&, 0&, 0&, _
        (SWP_NOSIZE Or SWP_NOMOVE))
Me.Toolbar1.Left = 0
Me.Toolbar1.Width = Me.Width
End SubPrivate Sub Form_Unload(Cancel As Integer) 
Call SetWindowPos(Me.hwnd, HWND_NOTOPMOST, 0&, 0&, 0&, 0&, _
        (SWP_NOSIZE Or SWP_NOMOVE))
End Sub

Answer 5

to:：　ljzhost
请详说!谢谢