Office中国论坛/Access中国论坛

标题: 窗体定位 [打印本页]

---

作者: gxy1000    时间: 2011-3-6 23:36
标题: 窗体定位
请教当打开的窗体定位在主界面中的右边代码怎么？

---

作者: roych    时间: 2011-3-7 01:18
一般要先定位好主窗体大小和位置，才能据此定位打开窗体的。这是一段窗体居中的代码，供参考：

1. 
   
2. Private Sub Form_Load()
   
3. DoCmd.Echo False
   
4. Dim x, y As Integer
   
5. DoCmd.Maximize
   
6. x = Me.WindowWidth
   
7. y = Me.WindowHeight
   
8. DoCmd.Restore
   
9. DoCmd.Echo True
   
10. Move (x - Me.WindowWidth) / 2, (y - Me.WindowHeight) / 2
    
11. End Sub
    

复制代码

---

欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/)

Powered by Discuz! X3.3