VC注释宏COMMENTMAC.dsm
VC注释宏COMMENTMAC
Sub LineComment()
lTopLine = ActiveDocument.Selection.TopLine
lBottomLine = ActiveDocument.Selection.BottomLine
For I = lTopLine To lBottomLine
ActiveDocument.Selection.MoveTo I,1
ActiveDocument.Selection.SelectLine
s = ActiveDocument.Selection.Text
if left(s,2) = “//“ then
s = right(s,len(s)-2)
else
s = “//“ + s
end if
ActiveDocument.Selection.Text = s
Next
End Sub
转载请注明来源,欢迎对文章中的引用来源进行考证,欢迎指出任何有错误或不够清晰的表达。可以在下面评论区评论,也可以邮件至 Web@Cool02.com
文章标题:VC注释宏COMMENTMAC.dsm
文章字数:54
本文作者:零贰
发布时间:2010-08-25, 12:11:41
最后更新:2020-03-26, 15:16:36
原始链接:/html/20100825121141.html版权声明: "署名-非商用-相同方式共享 4.0" 转载请保留原文链接及作者。