|
|
|
|
|
|
|
|
Dicas
|
|
|
Visual Basic (Forms/MDI)
|
|
 |
Título da Dica: Centralizar FORM em MDI
|
 |
|
|
|
Postada em 11/3/2003 por Felipe
Private Sub Form_Load()
Dim MDIMeioX, MDIMeioY As Single
Dim FormMeioX, FormMeioY As Single
MDIForm1.Show
MDIMeioX = MDIForm1.Width / 2
FormMeioX = Form1.Width / 2
Form1.Left = MDIMeioX - FormMeioX
MDIMeioY = MDIForm1.Height / 2
FormMeioY = Form1.Width / 2
Form1.Top = MDIMeioY - FormMeioY
End Sub
|
|
|
|
|
