主题：关于界面

'===================标题窗口下的边框修改颜色====================

Dim clr As Color = Color.FromARGB(255,179,212,255) '定义一个颜色

'遍历当前的共有窗口,设置颜色和边框样式

For Each obj As object In BaseMainForm.Controls

    If TypeOf obj Is C1Command.C1CommandDock Then

        Dim C1DT As C1Command.C1CommandDock = obj

        For Each obj2 As object In C1DT.Controls

            obj2.BackColor =clr

            If TypeOf obj2 Is C1Command.C1DockingTab Then

                obj2.BorderStyle = 0

            End If

        Next

    End If

Next

注销这个代码就变成两条线，但是其它项目加上代码还是两条线。