为什么这样还无法使得图像控件随着窗体的最大化依然紧贴状态栏

[chinazzj]

我是这样常识的，似乎无效：

If IsZoomed(frmmain.hwnd) Then
frmmain.ImgZhhz.Top = frmmain.Height - frmmain.StatusBar1.Height
End If

[wisecloud]

首先，改变大小最好使用窗体的 Resize 事件。
其次，窗体的 Height 属性包括了窗体的标题和边框，应使用 ScaleHeight 获得实际有效高度。
所以我认为是这样：
frmmain.ImgZhhz.Top = frmmain.ScaleHeight - frmmain.StatusBar1.Height

[goodname008]

' 你是想永远让PictureBox在StatusBar里面吗?
' 可以这样

Option Explicit
Private Declare Function SetParent Lib "user32" (ByVal hWndChild As Long, ByVal hWndNewParent As Long) As Long

Private Sub Form_Resize()
SetParent Picture1.hWnd, StatusBar1.hWnd
Picture1.Top = 0
End Sub

[goodname008]

楼主想实现什么？可以把问题再说清楚些吗？ :)

[chinazzj]

谢谢你们，我的意思是这样的：
我把窗体设计为可以最大最小化，在合适大小时imgzhhz对象恰好在状态栏下方，
可是最大化后还是在原位置，这样不好看，我想随着最大化事件的触发，
图象自动调整位置，依然恰好在状态栏上方

[goodname008]

那我上面那段代码就能实现，你运行一下看看如何？ :)

[goodname008]

代码的原理就是把图片框设置成状态栏的子窗口了。
这样不管它怎么变都没问题。 :)