Foxtable(狐表)用户栏目专家坐堂 → 页面集合问题


  共有2767人关注过本帖树形打印复制链接

主题:页面集合问题

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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2018/2/22 21:36:00 [显示全部帖子]

'筛选设置左侧停靠-------------------------------
Dim CmdDock As New C1Command.C1CommandDock
CmdDock.Name = "CmdDock"
CmdDock.BackColor = System.Drawing.SystemColors.Control
CmdDock.Dock = Windows.Forms.DockStyle.Left
CmdDock.AutoDockTop = False
CmdDock.AutoDockBottom = False
CmdDock.DockingStyle = C1Command.DockingStyle.VS2005
e.Form.Panel.Controls.Add(CmdDock)


Dim TabCtl As C1Command.C1DockingTab = e.Form.Controls("TabControl1").BaseControl
TabCtl.VisualStyle = C1Command.VisualStyle.Office2007Blue
TabCtl.HotTrack = True
TabCtl.ShowCaption = True
TabCtl.ShowTabList = True
TabCtl.CanAutoHide = True
CmdDock.Controls.Add(TabCtl)
TabCtl.autohiding = True


 回到顶部