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