select case 重排出错 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Case "CheckBox1"
        Dim cks As WinForm.CheckBox = e.Sender
        If cks.Checked Then
            Tables("生产时间_table1").Cols("预处理时间1").Visible = True
            Tables("生产时间_table1").Cols("预处理清场1").Visible = True
        Else
            Tables("生产时间_table1").Cols("预处理时间1").Visible = False
            Tables("生产时间_table1").Cols("预处理清场1").Visible = False
        End If
        Case"CheckBox2"

Dim cks As WinForm

如上，每次调整好select case 后，按下重拍，总会将后面的case 缩进去。如何调整？

主题：select case 重排出错