vb 实时调整窗体位置~

来源:百度知道 编辑:UC知道 时间:2024/06/24 15:10:51
vb 实时调整窗体位置

窗体设置的WindowState设置为0

我的窗体设置为显示在屏幕中心,但是我开了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

============================================================

请高手给出解决方法~不会者、不懂者、无聊刷分者不要回复~

想知道答案者,请一起关注本问题

好手、高手、知道解决者,请留下你的详细源码~~谢谢~~~
============================================================















楼下的回答错误~~

在timer下面放置下面的代码:

If Me.Left <> (Screen.Width - Form1.Width) / 2 Or Me.Top <> (Screen.Height - Form1.Height) / 2 Then
Me.Left = (Screen.Width - Form1.Width) / 2
Me.Top = (Screen.Height - Form1.Height) / 2
End If

你有没有试过就说错误.这代码可以实现你说的要求.不懂算了.菜鸟....

你的意思是窗体最小化了~~
那你就直接调整一下窗体的状态就好了