form窗体有一个属性是startposition,把它设置为centerscreen就是居中。
目前创新互联已为上1000家的企业提供了网站建设、域名、网络空间、网站托管维护、企业网站设计、大庆网站维护等服务,公司将坚持客户导向、应用为本的策略,正道将秉承"和谐、参与、激情"的文化,与客户和合作伙伴齐心协力一起成长,共同发展。
代码为
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
就是让窗体居中啦~
实现vb程序全屏运行。
1.打开Microsoft Visual Studio 2008/2010或者Visual basic应用软件;
2.新建一个windows窗体应用程序;
3.选中窗体,在右下角窗体属性中找到windowstate和formborderstyle两项。分别将其属性更改为Maximized和None(windowstate:Maximized/formborderstyle:None);
4.按F5运行看看是不是已经全屏运行了。
实现vb程序居中运行。
在主窗体的Form_load()中的最前面加入下列代码:
Dim X0 As long
Dim Y0 As Long
'让窗体居中
X0=Screen.Width
Y0=Screen.Height
X0=(X0-Me.Width)/2
Y0=(Y0-Me.Height)/2
Me.MoveX0,Y0-
方法一:
Me.Left=Screen.Width/2-Me.Width/2
Me.Top=Screen.Height/2-Me.Height/2
方法二:
将窗体的StartUpPosition属性设为2,屏幕中心