在Ultraedit中用宏实现将选中的代码设置为注释

InsertMode
ColumnModeOff
HexOff
UnixReOff
IfSel
StartSelect
Key END
Cut
Key HOME
IfColNum 1
Key END
EndIf
"/* "
TimeDate
"
"
Key END
Paste
Key END
"
"
TimeDate
" */"
EndIf

下面是对代码解除注释的宏代码，同样需要选中希望解除注释的代码块，选中的首尾位置可以在首位行的任意位置。

InsertMode
ColumnModeOff
HexOff
UnixReOn
IfSel
Cut
"~@#"
Paste
DeleteLine
"~@@#"
Top
Find "~@#"
DeleteLine
Find "~@@#"
Delete
EndIf

下面是对单行代码加"//"注释的宏代码，这个就简单多了 :-)

InsertMode
ColumnModeOff
HexOff
UnixReOff
"~@#"
Key HOME
IfColNum 1
Else
Key HOME
EndIf
"//"
Find "~@#"
Delete

最后是解除行注释的宏代码：

InsertMode
ColumnModeOff
HexOff
UnixReOff
"~@#"
Key HOME
IfCharIs "/"
Delete
IfCharIs "/"
Delete
Else
"/"
EndIf
EndIf
Find "~@#"
Delete

对行的注释和解除注释不需要选中行，只需要光标落在此行中即可。这里要提一下的是，本来对于行解除注释的宏想写成如下形式的：

InsertMode
ColumnModeOff
HexOff
UnixReOff
"~@#"
Key HOME
IfCharIs "/"
Key Right Arrow
IfCharIs "/"
Key Right Arrow
DeleteToStartofLine
EndIf
EndIf
Find "~@#"
Delete

这样可读性好些，实现逻辑也合理，让人Faint的是，我用的是UEV11的中文版，不支持Key Right Arrow，如果使用宏录制功能，得到的是Key  右箭头 →，但如果手动写Key  右箭头 →，系统就报错，说没有这个命令，真让人不得其解~~~这里由于存在一些逻辑，所以不能录制，只能手写。

补充：Web开发 , ASP.Net ,

上一个：编程实现邮件地址有效性检测
下一个：VB/VB.NET/C#导出到Excel的方法