主题：代码编辑器可否考虑增加一个代码批量注释功能？

在代码编辑器上调试代码，有时是复制整段代码上去，当不想执行时，要逐条加‘ 以表注释，不太方便，可否考虑增加一个“代码注释”按钮，一点就将所选代码加上注释标记了，再按一次就去掉注释标记？？

 

这个功能，也可以。。。，希望实现这个功能

 

 

不是吧，那太无聊了呀。。。。。

 

要增加就加个单步调试（一句代码执行后要按单步进入才到下一句, 这样可以在输出栏看到每步的调试输出结果，特别对循环的检查有好处）

类似这个：

 

dim cont as string()
dim ls as WinForm.TextBox
ls = e.form.Controls("textbox1")
cont = ls.SelectedText.Split(Chr(13))

If e.Control = True AndAlso e.KeyCode = Keys.F11 Then
  for each s as string in cont
  dim ss as string
    if cont(0).SubString(0,1)="'"  then
          if s=cont(0) then
             ss= s.SubString(1) & vbcrlf
             else
            ss = s.SubString(2) & vbcrlf
          end if
     else
           if s=cont(0) then
             ss = "'" & s.SubString(0) & vbcrlf
             else
             ss = "'" & s.SubString(1) & vbcrlf
          end if
    end if
   ls.SelectedText = ss
  next
end if

 

 

 

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:管理项目18.table

说明：选中代码行后，同时按ctrl和f11，批量注释和反注释