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