vb.net修改窗口位置 vb改变窗体大小
vb.net 窗体位置
form窗体有一个属性是startposition,把它设置为centerscreen就是居中。
10余年的莱芜网站建设经验,针对设计、前端、开发、售后、文案、推广等六对一服务,响应快,48小时及时工作处理。营销型网站建设的优势是能够根据用户设备显示端的尺寸不同,自动调整莱芜建站的显示方式,使网站能够适用不同显示终端,在浏览器中调整网站的宽度,无论在任何一种浏览器上浏览网站,都能展现优雅布局与设计,从而大程度地提升浏览体验。创新互联从事“莱芜网站设计”,“莱芜网站推广”以来,每个客户项目都认真落实执行。
代码为
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定义窗口的位置
vb中调节窗口的大小和位置使用move方法。
Move方法的语法如下:
[object.]Move
left
,
top,
width,
height
object
是被移动的窗体或控件。如果省略了
object,则移动的是当前窗体。left
和
top
参数是
object
对象的
Left
和
Top
属性的新设置值,而
width
和
height
则是它的
Width
和
Height
属性的新设置值。其中,只有
left
是必须的,但是,若要指定其它参数时,就必须一并指定参数列表中出现在指定参数之前的所有参数。
例子1:
功能:移动窗体让窗口位于右上角。
语句:Me.Move
Screen.Width-me.width,
说明:Screen.Width-me.width是屏幕宽度减去窗体宽度,即窗体距离屏幕左边的距离
例子2:
功能:使窗体窗口与屏幕大小相同,一般用于窗体最大化或全屏程序功能
语句:Me.Move
0,
0,
Screen.Width,
Screen.Height
vb.net 窗口位置
你的 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的构造函数中。
急!!在VB.NET中窗口位置调整问题!!!!
'点击窗口的任何位置拖动窗体
Dim ctX As Single, ctY As Single
Private Sub Form_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)
ctX = X: ctY = Y
End Sub
Private Sub Form_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
If Button = 1 Then
Me.Left = Me.Left + X - ctX
Me.Top = Me.Top + Y - ctY
End If
End Sub
文章名称:vb.net修改窗口位置 vb改变窗体大小
文章转载:http://pwwzsj.com/article/hhcsec.html