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
============================================================
请高手给出解决方法~不会者、不懂者、无聊刷分者不要回复~
想知道答案者,请一起关注本问题
好手、高手、知道解决者,请留下你的详细源码~~谢谢~~~
============================================================
↓
↓
↓
↓
↓
↓
↓
↓
↓
↓
↓
↓
↓
↓
↓
楼下的回答错误~~
窗体设置的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
你有没有试过就说错误.这代码可以实现你说的要求.不懂算了.菜鸟....
你的意思是窗体最小化了~~
那你就直接调整一下窗体的状态就好了