vb 实时调整窗体位置
来源:百度知道 编辑:UC知道 时间:2024/09/21 02:44:16
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了,不管屏幕分辨率如果,窗体都会位于屏幕中心。