189 8069 5689
form窗体有一个属性是startposition，把它设置为centerscreen就是居中。
成都创新互联公司-专业网站定制、快速模板网站建设、高性价比阜平网站开发、企业建站全套包干低至880元,成熟完善的模板库,直接使用。一站式阜平网站制作公司更省心,省钱,快速模板网站建设找我们，业务覆盖阜平地区。费用合理售后完善，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
就是让窗体居中啦～
你的 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的构造函数中。
方法如下：
1、打开例1.1创建的工程。
2、选择窗体Form1并双击该窗体，出现窗体的调事件的过程代码体。
3、在窗体调用的过程代码体中编制如下过程代码：
Private Sub Form_Load()
Form1.Width = 4860
Form1.Height = 2520
End Sub
4、设置窗体Form1的SartUpPosition属性为2-屏幕中心，这样运行窗体可以发现，屏幕的大小与例1.6中通过属性设置的大小是一致的。
1、如果你的窗体就是你当前工程这个EXE本身的窗体，
那么窗体所在的路径就是工程的启动路径，用下面的语句获取：
AppPath=Application.StartupPath
2、如果你的窗体是你自己LoadLibrary的某个DLL的窗体，那么你既然能LoadLibrary，就应该知道它的路径，所以不用问了。