UC知道vb 实时调整窗体位置
来源：百度知道 编辑：UC知道 时间：2024/06/18 07:22:20
vb 实时调整窗体位置
窗体设置的WindowState设置为2，即屏幕中心
我的窗体设置为显示在屏幕中心，但是我开了cs或魔兽之后，退出游戏
却发现窗体不在屏幕中心了~
以下2方法都已经用过，放在timer内试过，放在Form_Resize内也试了....
If WindowState = 0 Then
Me.Left = (Screen.Width - Form1.Width) / 2
Me.Top = (Screen.Height - Form1.Height) / 2
End If
或者
If WindowState = 0 Then
Move (Screen.Width - Form1.Width) / 2, (Screen.Height - Form1.Height) / 2
End If
============================================================
请高手给出解决方法~不会者、不懂者、无聊刷分者不要回复~
想知道答案者，请一起关注本问题
好手、高手、知道解决者，请留下你的详细源码~~谢谢~~~
============================================================
对了...
楼下的错误指出的对，是我打错了~~应该是
窗体设置的WindowState设置为0
至于你说的最后一句，请你尝试之后再说！~~
窗体设置的WindowState设置为2，即屏幕中心
我的窗体设置为显示在屏幕中心，但是我开了cs或魔兽之后，退出游戏
却发现窗体不在屏幕中心了~
以下2方法都已经用过，放在timer内试过，放在Form_Resize内也试了....
If WindowState = 0 Then
Me.Left = (Screen.Width - Form1.Width) / 2
Me.Top = (Screen.Height - Form1.Height) / 2
End If
或者
If WindowState = 0 Then
Move (Screen.Width - Form1.Width) / 2, (Screen.Height - Form1.Height) / 2
End If
============================================================
请高手给出解决方法~不会者、不懂者、无聊刷分者不要回复~
想知道答案者，请一起关注本问题
好手、高手、知道解决者，请留下你的详细源码~~谢谢~~~
============================================================
对了...
楼下的错误指出的对，是我打错了~~应该是
窗体设置的WindowState设置为0
至于你说的最后一句，请你尝试之后再说！~~
先纠正一点，WindowState是指窗口状态，2为最大化，窗体位置的那个属性是StartUpPosition设为2就行了，另外，有些游戏启动需要更改屏幕分辨率，退出时会改回来，你看看你的有没有改回来
如果把StartUpPosition设为2了，不管屏幕分辨率如果，窗体都会位于屏幕中心。