如何根据电脑屏幕尺寸自动调节页面布局

jay_0218

我地ACCESS系统在分辨率1024*768电脑上编写的
但到分辨率是1280*800电脑上 以前的布局全部歪到一边去了

请各位帮小弟看一下 如何根据电脑分辨率自动调节页面布局
谢谢

liaug

窗体真正居中显示

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[:34]
试一下这个

jay_0218

谢谢
你的代码的意思是将每个界面正中显示?
我的意思是界面是中间显示的
只是界面里面的字段什么的 不中间显示

jay_0218

顶一下
还没人帮我看看了