vc 2003 下注释宏

最新推荐文章于 2021-03-20 21:52:15 发布

原创最新推荐文章于 2021-03-20 21:52:15 发布 · 401 阅读

CC 4.0 BY-SA版权

Sub TemporaryMacro()
        DTE.ActiveDocument.Selection.Text = "/*##########################################################################################"
        DTE.ActiveDocument.Selection.NewLine()
        DTE.ActiveDocument.Selection.Text = "* "
        DTE.ActiveDocument.Selection.NewLine()
        DTE.ActiveDocument.Selection.Text = "* "
        DTE.ActiveDocument.Selection.NewLine()
        DTE.ActiveDocument.Selection.Text = "##########################################################################################*/"
        DTE.ActiveDocument.Selection.LineUp(False, 1)
        DTE.ActiveDocument.Selection.Text = System.DateTime.Now.ToString()
        DTE.ActiveDocument.Selection.LineUp(False, 1)
    End Sub