

界面/窗体/控件
Access窗体居中显示技巧
2013-11-21 01:19:00
在access中,窗体打开是杂乱无章的,正常情况下是窗体在哪里关闭,就在哪里打开,大小也是这样,关闭的时候是多大,下次再打开就是多大。
下面的代码可以做到真正使窗体居中显示
Private Sub Form_Load()
DoCmd.Echo False
Dim x, y As Integer
DoCmd.Maximize
x = Me.WindowWidth
y = Me.WindowHeight
DoCmd.Restore
DoCmd.Echo True
Move (x - Me.WindowWidth) / 2, (y - Me.WindowHeight) / 2
End Sub