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

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

第1个回答  2012-03-19
设置form2的位置,在form1中加个时间控件 间隔小于10。然后在时间控件中 写代码
Form2.Left = Form1.Left + x
Form2.Top = Form1.Height + y
x,y的值自己去调试
虽为复制,如对你有帮助请采纳。
第2个回答  2012-03-19
Private Sub Form_Load()
With Me
.BorderStyle = 0
.Left = MDIForm1.ScaleWidth / 2 - .Width / 2
.Top = MDIForm1.ScaleHeight / 2 - .Height / 2
End With
End Sub

是这么个意思么?
第3个回答  2012-03-19
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本回答被提问者采纳
相似回答