我的需求：把“TabControl”放倒“Controls("SplitContainer1").Panel2”这个里面，而不是放倒整个界面上。
'筛选设置左侧停靠-------------------------------
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 tbc As WinForm.TabControl = e.Form.Controls("TabControl")
e.Form.Controls("SplitContainer1").Panel2.AddControl(tbc)
Dim TabCtl As C1Command.C1DockingTab = e.Form.Controls("TabControl").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 '关闭页面集合
加好友 
发短信
Post By：2018/8/8 15:44:00 [只看该作者]
