检查屏幕分辨率：
Private Sub Form_Load()
Form1.Show
MsgBox "does form1.StartUpPosition = 2"
b = (Form1.Height / 2 + Form1.Top) / 7.5
a = (Form1.Width / 2 + Form1.Left) / 7.5
MsgBox a & ", " & b
End Sub
内容全部来源于网络收集，如有侵权，请联系网站删除：QQ：24596024