vb MDI主窗体中添加了picture适应窗体大小后子窗体无法显示出来时为什么呢?

2025-02-25 15:05:57
推荐回答(3个)
回答1:

1、MDI主窗体内直接添加的控件与MDI子窗体是同级的,所以你如果你坚持要用Picture控件,那么效果就只能这样了;

2、如果你用Picture的目的是想显示背景图,那么可以直接用MDI主窗体的Picture属性;

3、如果想实现背景图随窗体的大小自动调整大小,可以用下面的代码实现:

Dim p As PictureBox

Private Sub MDIForm_Resize()
If p Is Nothing Then
    Set p = Controls.Add("VB.PictureBox", "pic")
    p.ScaleMode = 3
    p.AutoRedraw = True
    p.BorderStyle = 0
    p.Picture = LoadPicture("f:\1.jpg") '图片名自己改
End If
p.Height = Me.ScaleHeight
p.Width = Me.ScaleWidth
p.PaintPicture p.Picture, 0, 0, p.ScaleWidth, p.ScaleHeight
Me.Picture = p.Image
Me.Hide
Me.Show
End Sub

回答2:

选中MDI窗体的picture控件,在菜单栏——格式——单击锁定控件前面的锁,即可。

回答3:

右键单击某个控件,会弹出一个菜单,选择置顶或置下,具体我记不太清了,你试试。