窗口自动居中
Private Sub Form_Load()<br/> Left = (Screen.Width - Width) \ 2<br/> Top = (Screen.Height - Height) \ 2 '使窗体居中<br/>End Sub <p>设置窗体<strong>StartUpPosition属性为vbStartUpScreen也可以达到这样的效果</strong></p><p><strong>另外,代码里面要再分别减去窗体的高与宽的一半,否则窗体跑得偏右下</strong></p>
页:
[1]