随父窗体大小自动变化的子窗体一例-zoutians
Access软件网QQ交流学习群(群号码198465573),欢迎您的加入!
首页 >技术文章> 源码示例


随父窗体大小自动变化的子窗体一例

发表时间:2008/6/26 10:33:17 评论(4) 浏览(10118)  评论 | 加入收藏 | 复制
   
摘 要:在加载事件和调整代码事件中分别写入了以下代码:
正 文:

在加载事件和调整代码事件中分别写入了以下代码:

Private Sub Form_Load()    ' 加载
    Me.Orders.Width = Me.Form.InsideWidth - 2 * Me.Orders.Left
    Me.Orders.Height = Me.Form.InsideHeight - 510
End Sub

Private Sub Form_Resize()    ' 调整大小
    If Me.Form.InsideHeight > 3000 Then     ' 父窗口小于某值时停止,不然会出错
        Me.Orders.Width = Me.Form.InsideWidth - 2 * Me.Orders.Left
        Me.Orders.Height = Me.Form.InsideHeight - 510
    End If
End Sub

点击下载此附件


Access软件网交流QQ群(群号:198465573)
 
 相关文章
随父窗体大小自动变化的子窗体一例  【zoutians  2008/6/26】
常见问答
技术分类
相关资源
文章搜索
关于作者

zoutians

文章分类

文章存档

友情链接