在MDIForm_Load中有frmBack.Show,frmBack作为背景;
MDIForm_Resize中的代码:
frmBack.Width = Me.ScaleWidth
frmBack.Height = Me.ScaleHeight
frmBack窗体
Private Sub Form_Load()
Me.Move 0, 0
Me.Width = frmMDI.ScaleWidth
Me.Height = frmMDI.ScaleHeight
End Sub
正常情况下frmBack都可以充满MDIForm,但是当最小化MDIForm,在激活MDIForm时,
frmBack的大小确没有充满MDIForm,请高手进!!!
MDIForm_Resize中的代码:
frmBack.Width = Me.ScaleWidth
frmBack.Height = Me.ScaleHeight
frmBack窗体
Private Sub Form_Load()
Me.Move 0, 0
Me.Width = frmMDI.ScaleWidth
Me.Height = frmMDI.ScaleHeight
End Sub
正常情况下frmBack都可以充满MDIForm,但是当最小化MDIForm,在激活MDIForm时,
frmBack的大小确没有充满MDIForm,请高手进!!!
Me.Move 0, 0
Me.Width = frmMDI.ScaleWidth
Me.Height = frmMDI.ScaleHeight
End Sub
不知道对不对
反正就是在resize里检测midform是不是符合要求,如果不符合就执行让它符合要求的代码
Me.Move 0, 0
Me.Width = frmMDI.ScaleWidth
Me.Height = frmMDI.ScaleHeight
End Sub
不知道对不对
反正就是在resize里检测midform是不是符合要求,如果不符合就执行让它符合要求的代码