Question

vb中怎样让mdi子窗体总是显示在mdi主窗体中央位置，都搞了一天了，真的不知道怎么办了~~~

在写一个小程序，这里遇到了困难，求大牛帮帮忙，都搞了一天了，真的不知道怎么弄了，在线等待，qq352889950

Answer 1

设置form2的位置，在form1中加个时间控件 间隔小于10。然后在时间控件中 写代码
Form2.Left = Form1.Left + x
Form2.Top = Form1.Height + y
x,y的值自己去调试
虽为复制，如对你有帮助请采纳。

Answer 2

Private Sub Form_Load()
With Me
.BorderStyle = 0
.Left = MDIForm1.ScaleWidth / 2 - .Width / 2
.Top = MDIForm1.ScaleHeight / 2 - .Height / 2
End With
End Sub

是这么个意思么？

Answer 3

mdi子窗体中resize事件加入以下代码：
Private Sub Form_Resize()
On Error Resume Next
If Me.Width >= MDIForm1.ScaleWidth Then
Me.Width = MDIForm1.ScaleWidth
Me.Left = 0
Else
Me.Left = (MDIForm1.ScaleWidth - Me.Width) / 2
End If
If Me.Height >= MDIForm1.ScaleHeight Then
Me.Height = MDIForm1.ScaleHeight
Me.Top = 0
Else
Me.Top = (MDIForm1.ScaleHeight - Me.Height) / 2
End If
End Sub