ActiveBar+ActiveSizer

来源:互联网 发布:淘宝不能代付怎么办 编辑:程序博客网 时间:2024/05/16 12:12
用ActiveBar做菜单、工具栏等
用ActiveSizer加载应用窗体
­
使用以下代码将ActiveSizer拼到窗体中去
Me.ActiveBar21.AutoSizeChildren = ddASClientArea
Me.ActiveBar21.ClientAreaControl = Me.ActiveSizer1
Me.ActiveBar21.RecalcLayout
­
使用以下代码加载应用窗体
If Not Me.ActiveSizer1.SubForm Is Nothing Then Unload Me.ActiveSizer1.SubForm
Me.ActiveSizer1.SubForm = New Form2
为保证new Form成功,尽量不要将复杂的代码写在onLoad事件,应妥善设置方法和属性使得Form生成后尽快完成参数交换及数据处理。
­
在每次新显现ActiveBar的Band之后使用以下代码重绘窗体
Me.ActiveBar21.RecalcLayout