本人写的以下语句不管用:
Private Sub Form_Load()
   Me.ScaleLeft = (Screen.Width - Me.Width) / 2
   Me.ScaleTop = (Screen.Height - Me.Height) / 2
End Sub

请高手帮助!

试试
Private Sub Form_Load()
   Me.Left = (Screen.Width - Me.ScaleWidth) / 2
   Me.Top = (Screen.Height - Me.ScaleHeight) / 2
End Sub

form的属性里有默认显示在屏幕中央。

form.StartUpPosition

form.StartUpPosition=2

Private Sub Form_Load()
   Me.Left = (Me.Width - Me.ScaleWidth) / 2
   Me.Top = (Me.Height - Me.ScaleHeight) / 2
End Sub
试一试，应该可以

设置一下。窗体属性，startupPosition属性值取2-屏幕中心

窗体属性，startupPosition属性值取2-屏幕中心，这样窗体就在屏幕中心了显示了