form窗体有一个属性是startposition，把它设置为centerscreen就是居中。
创新互联专业为企业提供桐梓网站建设、桐梓做网站、桐梓网站设计、桐梓网站制作等企业网站建设、网页设计与制作、桐梓企业网站模板建站服务，10多年桐梓做网站经验，不只是建网站，更提供有价值的思路和整体网络服务。
代码为
me.startposition
=
formstartposition.centerscreen。
如果是非要计算分辨率的话：
my.computer.screen.bounds.width
是分辨率中的宽度
my.computer.screen.bounds.height
是分辨率中的高度
那么
me.top
=
(my.computer.screen.bounds.height
-
me.height)
/
2
me.left
=
(my.computer.screen.bounds.width
-
me.width)
/
2
就是让窗体居中啦～
方法如下：
1、打开例1.1创建的工程。
2、选择窗体Form1并双击该窗体，出现窗体的调事件的过程代码体。
3、在窗体调用的过程代码体中编制如下过程代码：
Private Sub Form_Load()
Form1.Width = 4860
Form1.Height = 2520
End Sub
4、设置窗体Form1的SartUpPosition属性为2-屏幕中心，这样运行窗体可以发现，屏幕的大小与例1.6中通过属性设置的大小是一致的。
你的 Me.StartPosition =FormStartPosition.CenterScreen 写在哪的？
写在Form_Load事件里是不起作用的（也不叫不起作用，只是那个时候窗体已经不算Start了），一般代码是这样写，在Form1中的某个地方
Dim frm As New Form2
frm.StartPosition =FormStartPosition.CenterScreen
frm.ShowDialog()
如果你一定要在Form2中通过代码设置，可以把Me.StartPosition =FormStartPosition.CenterScreen移到Form2的构造函数中。
