以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  select case 重排出错  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=189634)
--  作者：lur320
--  发布时间：2023/12/13 9:46:00
--  select case 重排出错
 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 缩进去。如何调整？
--  作者：有点蓝
--  发布时间：2023/12/13 9:59:00
--  
加上必要的空格

Case "CheckBox2"