Giuseppe "Cowo" Corbelli ...

3rd of the saga...
Disclaimer: I'm not a visual basic programmer. In fact I don't know visual basic at all; this was my third experiment in vb.
Previous posts were about a similar macro for Visual Studio 6.0 and 7.1.
This one works for the 8.0 IDE.
Thanks to mr. bc for pointing out and correcting a bug.

Sub CommentUncomment()
    Dim StartPoint, EndPoint As EnvDTE.EditPoint
    Dim Sel As EnvDTE.TextSelection

    Sel = DTE.ActiveDocument.Selection()
    StartPoint = Sel.TopPoint.CreateEditPoint()
    EndPoint = Sel.BottomPoint.CreateEditPoint()

    DTE.UndoContext.Open("Comment/Uncomment")
    Try
        Do While (True)
            StartPoint.StartOfLine()
            If StartPoint.GetText(3) = "//~" Then
                StartPoint.Delete(3)
            Else
                StartPoint.Insert("//~")
            End If

            If (StartPoint.Line = EndPoint.Line) Then
                Exit Do
            End If
            StartPoint.LineDown()
        Loop
    Finally
        DTE.UndoContext.Close()
    End Try

End Sub

Pyreb is a wxPython GUI to the re python module; it will speed up the development of Python regular expression (similar to PCRE). This release features minor enhancements. See

• Freshmeat announcement
• Pyreb homepage