Office中国论坛/Access中国论坛

标题: 窗体打开问题 [打印本页]

作者: liaoqiang234 时间: 2010-1-25 19:16
标题: 窗体打开问题
本帖最后由 liaoqiang234 于 2010-1-25 19:22 编辑

我有一主窗体，类似QQ界面大小，主窗体宽度方向是在屏幕的最左边，高度方向是在屏幕的中心，现在有个问题，后面的操作模块窗体，宽度方向贴近主窗体的最右边，高度方向的Y+方向与主画面对齐，所有模块窗体都这样

[attach]41309[/attach]

作者: kangking 时间: 2010-1-25 19:46
Private Sub Command0_Click()
DoCmd.OpenForm "窗体2"

Forms("窗体2").Move Me.WindowLeft + Me.WindowWidth, Me.WindowTop

End Sub

在你的按钮单击事件代码中加了一句

作者: liaoqiang234 时间: 2010-1-25 19:49
谢谢kangking 帮助，效果已打到，能不能在主窗体加载事件中实现，因为主窗体是一直打开的

作者: kangking 时间: 2010-1-25 19:53

谢谢kangking 帮助，效果已打到，能不能在主窗体加载事件中实现，因为主窗体是一直打开的
liaoqiang234 发表于 2010-1-25 19:49

恐怕不行,因为你要打开什么窗体主窗体是不知道的,只有打开后再移动.

作者: liaoqiang234 时间: 2010-1-25 20:54
错了，不是主窗体加载，是窗体2加载中实现

作者: kangking 时间: 2010-1-25 21:25

错了，不是主窗体加载，是窗体2加载中实现
liaoqiang234 发表于 2010-1-25 20:54

Private Sub Form_Load()
Me.Move Forms("主窗体").WindowLeft + Forms("主窗体").WindowWidth, Forms("主窗体").WindowTop
End Sub

作者: liaoqiang234 时间: 2010-1-25 21:36

谢谢

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