Foxtable(狐表)用户栏目专家坐堂 → [求助]分区面板自动大小代码没执行


  共有2600人关注过本帖平板打印复制链接

主题:[求助]分区面板自动大小代码没执行

帅哥哟,离线,有人找我吗?
jyh7081
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:四尾狐 帖子:957 积分:8434 威望:0 精华:0 注册:2012/10/3 13:25:00
[求助]分区面板自动大小代码没执行  发帖心情 Post By:2017/7/9 13:49:00 [只看该作者]

窗口中的页面集合有4个页面,每个页面内有一个分区面板,希望在打开窗口时每个分区面板的两个分区大小一样,代码如下,放在窗口的afterload事件中,但没有起作用,是何原因?

Dim sp3 As WinForm.SplitContainer = e.Form.Controls("SplitContainer3")
sp3.SplitterDistance = sp3.Width * 0.5
Dim sp4 As WinForm.SplitContainer = e.Form.Controls("SplitContainer4")
sp4.SplitterDistance = sp4.Width * 0.5
Dim sp5 As WinForm.SplitContainer = e.Form.Controls("SplitContainer5")
sp5.SplitterDistance = sp5.Width * 0.5
Dim sp6 As WinForm.SplitContainer = e.Form.Controls("SplitContainer6")
sp6.SplitterDistance = sp6.Width * 0.5
[此贴子已经被作者于2017/7/9 14:07:24编辑过]

 回到顶部