锐客网

  1. 首页 > 睿知 > it技术 > >

vb.net修改窗口位置 vb代码编辑窗口

IT技术Ibdata1

vb.net 窗体位置form窗体有一个属性是startposition，把它设置为centerscreen就是居中 。
代码为
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方法的语法如下vb.net修改窗口位置：
[object.]Move left , top, width, height
object 是被移动的窗体或控件 。如果省略了 objectvb.net修改窗口位置，则移动的是当前窗体 。left 和 top 参数是 object 对象的 Left 和 Top 属性的新设置值，而 width 和 height 则是它的 Width 和 Height 属性的新设置值 。其中，只有 left 是必须的，但是，若要指定其它参数时 ， 就必须一并指定参数列表中出现在指定参数之前的所有参数 。
例子1：
功能：移动窗体让窗口位于右上角 。
语句：Me.Move Screen.Width-me.width, 0
说明：Screen.Width-me.width是屏幕宽度减去窗体宽度 ， 即窗体距离屏幕左边的距离
例子2：
功能：使窗体窗口与屏幕大小相同，一般用于窗体最大化或全屏程序功能
语句：Me.Move 0, 0, Screen.Width, Screen.Height
急?。≡赩B.NET中窗口位置调整问题?。。。?/h2>'点击窗口的任何位置拖动窗体
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代码编辑窗口】关于vb.net修改窗口位置和vb代码编辑窗口的介绍到此就结束了，不知道你从中找到你需要的信息了吗 ？如果你还想了解更多这方面的信息，记得收藏关注本站 。

    推荐阅读


    上一篇：洗澡拍摄秘诀是什么，洗澡拍照的说说

    下一篇：使用flutter可以彻底替代原生吗，flutter需要原生开发