如何在Visual Studio中定义断点集?

onm*_*133 5 add-in breakpoints visual-studio

我想在Visual Studio中定义一些断点集,以便我可以在它们之间切换.

,我指的是我定义的某些线的断点集合.我有很多场景,我想在这些集之间切换以简化我的调试.

例如:

Set 1: breakpoints at line 1, line 3, line 5, line 7
Set 2: breakpoints at line 2, line 4, line 6, line 8,
Run Code Online (Sandbox Code Playgroud)

有什么方法可以在Visual Studio中使用它(2008年及以上是首选),还是有任何加载项?

ale*_*sky 2

此功能在 Visual Studio 2010 和 2012 中的断点窗口中可用。 http://msdn.microsoft.com/en-us/library/dd293674.aspx

(c) Visual Studio 团队(产品团队,微软)2012 年 11 月 21 日

http://visualstudio.uservoice.com/forums/121579-visual-studio/suggestions/2394909-breakpoint-sets-or-groups-enable-disable-breakp

另外,这里有一个在 Visual Studio 2008 中实现此功能的小宏。您可以将其复制到宏中的任何模块中(工具 > 宏 > 宏资源管理器 > 右键单击​​任何模块 > 编辑 > 粘贴到那里),然后将其添加为任何菜单的命令(通过“工具”>“自定义...”)

Dim savePath = "c:\temp"
Sub SaveBreakpoints()
    Dim fname As String
    Dim lBreakpointsList As System.Collections.Generic.List(Of Breakpoint)
    Dim fileList = IO.Directory.GetFiles(savePath)
    Dim lFiles = ""
    For Each lFile In fileList
        lFiles = String.Concat(lFiles, IO.Path.GetFileNameWithoutExtension(lFile), vbCrLf)
    Next
    fname = InputBox(String.Concat("Existing sets:", vbCrLf, lFiles, vbCrLf, "Name of new set:"), "Save Breakpoints", "1")
    If fname = "" Then
        Return
    End If
    lBreakpointsList = New System.Collections.Generic.List(Of Breakpoint)
    For Each lBreakpoint As EnvDTE.Breakpoint In DTE.Debugger.Breakpoints
        lBreakpointsList.Add(New Breakpoint(lBreakpoint.File, lBreakpoint.FileLine, lBreakpoint.Condition))
    Next

    Using fs As New IO.StreamWriter(String.Concat("c:\temp\", fname, ".txt"))
        For Each lBreakpoint As Breakpoint In lBreakpointsList
            fs.WriteLine(String.Format("{0}   |||   {1}   |||   {2}", lBreakpoint.File, lBreakpoint.Line, lBreakpoint.Condition))
        Next
    End Using
End Sub

Sub RestoreBreakpoints()
    Dim fname As String
    Dim lBreakpointsList As System.Collections.Generic.List(Of Breakpoint)
    Dim lProperties As String()
    Dim fileList = IO.Directory.GetFiles(savePath)
    Dim lFiles = ""
    For Each lFile In fileList
        lFiles = String.Concat(lFiles, IO.Path.GetFileNameWithoutExtension(lFile), vbCrLf)
    Next
    fname = InputBox(String.Concat("Enter name of set to restore. Existing sets:", vbCrLf, vbCrLf, lFiles), "Restore Breakpoints", "1")
    If fname = "" Then
        Return
    End If
    lBreakpointsList = New Collections.Generic.List(Of Breakpoint)
    Dim lBp As Breakpoint
    Using fs As New IO.StreamReader(String.Concat("c:\temp\", fname, ".txt"))
        While Not fs.EndOfStream
            lProperties = fs.ReadLine().Split(New String() {"   |||   "}, StringSplitOptions.None)
            lBp = New Breakpoint(lProperties(0), lProperties(1), lProperties(2))
            lBreakpointsList.Add(lBp)
        End While
    End Using
    Try
        DTE.ExecuteCommand("Debug.DeleteAllBreakpoints")
    Catch ex As Exception
    End Try
    For Each lBp1 As Breakpoint In lBreakpointsList
        DTE.Debugger.Breakpoints.Add(, lBp1.File, Convert.ToInt32(lBp1.Line), , lBp1.Condition)
    Next
End Sub

Class Breakpoint
    Public File
    Public Line
    Public Condition

    Public Sub New(ByVal pFile, ByVal pLine, ByVal pCondition)
        File = pFile
        Line = pLine
        Condition = pCondition
    End Sub
End Class
Run Code Online (Sandbox Code Playgroud)