日韩无码专区无码一级三级片|91人人爱网站中日韩无码电影|厨房大战丰满熟妇|AV高清无码在线免费观看|另类AV日韩少妇熟女|中文日本大黄一级黄色片|色情在线视频免费|亚洲成人特黄a片|黄片wwwav色图欧美|欧亚乱色一区二区三区

RELATEED CONSULTING
相關(guān)咨詢
選擇下列產(chǎn)品馬上在線溝通
服務(wù)時(shí)間：8:30-17:00
你可能遇到了下面的問題
關(guān)閉右側(cè)工具欄

新聞中心

這里有您想知道的互聯(lián)網(wǎng)營銷解決方案
利用VisualStudio2008宏實(shí)現(xiàn)自動(dòng)注釋

1. 在Tool中選擇Macros,打開Macro IDE

2. 在MyMacros 刪除默認(rèn)文件 Module1.vb,添加文件CommentHelper.Vb代碼內(nèi)容

 
 
 
 
    
  
  
  
  
  1. Imports System  
    2.   
  
  
  
  2. Imports EnvDTE  
    3.   
  
  
  
  3. Imports EnvDTE80  
    4.   
  
  
  
  4. Imports EnvDTE90  
    5.   
  
  
  
  5. Imports System.Diagnostics  
    6.   
  
  
  
  6. '注釋幫助模塊  
    7.   
  
  
  
  7. Public Module CommentHelper  
    8.   
  
  
  
  8. Sub AddClassComment()  
    9.   
  
  
  
  9. '定義選擇區(qū)域  
    10.   
  
  
  
  10. Dim DocSel As EnvDTE.TextSelection  
    11.   
  
  
  
  11. '初始化選擇區(qū)域是當(dāng)前文檔的選擇  
    12.   
  
  
  
  12. DocSel = DTE.ActiveDocument.Selection  
    13.   
  
  
  
  13. '選擇區(qū)域移動(dòng)到文檔的開頭  
    14.   
  
  
  
  14. DocSel.StartOfDocument()  
    15.   
  
  
  
  15. DocSel.Text = "/*******************************************************************" 
    16.   
  
  
  
  16. DocSel.NewLine()  
    17.   
  
  
  
  17. DocSel.Text = "* Copyright (C) abc Corporation" 
    18.   
  
  
  
  18. DocSel.NewLine()  
    19.   
  
  
  
  19. DocSel.Text = "* All rights reserved." 
    20.   
  
  
  
  20. DocSel.NewLine()  
    21.   
  
  
  
  21. DocSel.Text = "*" 
    22.   
  
  
  
  22. DocSel.NewLine()  
    23.   
  
  
  
  23. DocSel.Text = "Author: HBB0b0 (hbb0b0@163.com)" 
    24.   
  
  
  
  24. DocSel.NewLine()  
    25.   
  
  
  
  25. DocSel.Text = "Create Date:" + DateTime.Now.ToString()  
    26.   
  
  
  
  26. DocSel.NewLine()  
    27.   
  
  
  
  27. DocSel.Text = "Description:" + DTE.ActiveDocument.Name  
    28.   
  
  
  
  28. DocSel.NewLine()  
    29.   
  
  
  
  29. DocSel.Text = "*" 
    30.   
  
  
  
  30. DocSel.NewLine()  
    31.   
  
  
  
  31. DocSel.Text = "* Date Author Description" 
    32.   
  
  
  
  32. DocSel.NewLine()  
    33.   
  
  
  
  33. DocSel.Text = "*******************************************************************/" 
    34.   
  
  
  
  34. DocSel.NewLine()  
    35.   
  
  
  
  35. End Sub 
    36.   
  
  
  
  36. End Module 
    37.

3. 在需要添加注釋的項(xiàng)目中打開Macro 瀏覽器，如果看不到AddClassComment宏，則需要導(dǎo)入宏項(xiàng)目

4. 打開需要注釋文件,雙擊或運(yùn)行AddClassComment,就會(huì)添加如下效果的注釋。

 
 
 
 
    
  
  
  
  
  1. /*******************************************************************  
    2.   
  
  
  
  2. * * Copyright (C) abc Corporation  
    3.   
  
  
  
  3. * * All rights reserved.  
    4.   
  
  
  
  4. * *  
    5.   
  
  
  
  5. * Author: HBB0b0 (hbb0b0@163.com)  
    6.   
  
  
  
  6. * Create Date:2011-3-21 19:51:03  
    7.   
  
  
  
  7. * Description:Program.cs  
    8.   
  
  
  
  8. * *  
    9.   
  
  
  
  9. * * Date Author Description  
    10.   
  
  
  
  10. * *******************************************************************/  
    11.   
  
  
  
  11. using System;  
    12.   
  
  
  
  12. using System.Collections.Generic;  
    13.   
  
  
  
  13. using System.Linq;  
    14.   
  
  
  
  14. using System.Text;  
    15.   
  
  
  
  15. namespace MacroApplication  
    16.   
  
  
  
  16. {  
    17.   
  
  
  
  17. class Program  
    18.   
  
  
  
  18. {  
    19.   
  
  
  
  19. static void Main(string[] args)  
    20.   
  
  
  
  20. {  
    21.   
  
  
  
  21. }  
    22.   
  
  
  
  22. }  
    23.   
  
  
  
  23. } 
    24.

如果覺得這種方式不方便，可以把它做成ToolBar，下個(gè)項(xiàng)目使用的只需要運(yùn)行ToolBar中的對應(yīng)按鈕就可以了。

1. 在Tools中選擇自定義

2. 新添ToolBar 名稱為CommentHelper

3. 在命令頁簽Macros選擇AddClassComment

4. 按住Macro.MyMacros.CommentHelper.AddClassComment，把它拖到CommentHelper容器上

5. 拖放后的效果如下

6. 在以后的使用時(shí)不用再次打開宏項(xiàng)目，直接單擊CommentHelper中AddClassComment按鈕就可以添加類注釋了。

原文鏈接：http://www.cnblogs.com/hbb0b0/archive/2011/03/22/1990670.html


當(dāng)前標(biāo)題：利用VisualStudio2008宏實(shí)現(xiàn)自動(dòng)注釋
網(wǎng)頁URL：http://www.5511xx.com/article/dpjhgod.html