vc中录制宏来添加注释

vc6如果没有装VA的话可以用宏方法添加注释. 同理用宏可以实现很多激动人心的功能哦:)

加注释.net有快捷键,很方便.

以下引用自csdn  lzwcom(梅花香自苦寒来) :

需要用VBScript写的宏来实现,我有一个仅供参考
Sub AddComment()
'DESCRIPTION:  将选中的段落用//进行注释
 dim i
 Descr = ActiveDocument.Selection

 Descr2 = "//"
 for i=1 to len(descr)
  if mid(Descr, i,1) = chr(10) and i<> len(descr) then
     Descr2 = Descr2 + mid(Descr,i,1) + "//"
  else
     Descr2 = Descr2 + mid(Descr,i,1)
  end if
 next

 ActiveDocument.Selection = Descr2
End Sub
添加方法如下:
1.从Tools菜单中选Customize项,在Add-ins and macro files选页中点中SAMPLE,然后关闭
2.从Tools菜单中选Macro项,在出来的对话框中选任一个,点Edit按钮,然后把上面的代码拷贝到文档的最后.保存,关闭
3.从Tools菜单中选Customize项,在Command页,Category下拉框列表选项中选Macro,在右边的ListBox中,将AddComment用鼠标拖到工具栏,然后会让你选一个图标,你选一个你喜欢的。这期间会询问宏文件已更改,是否重新载入,点击是,确认
4.使用方法:选中一段文本,然后点击你刚才拖到工具栏上的按钮,当前文本就给注释调了
以上仅供参考,请指正.

阅读更多
想对作者说点什么?

博主推荐

换一批

没有更多推荐了,返回首页