2013-10-31 82 views
0

我正在使用VS加載項來更改調試命令行。 這部分工作,但我需要改變後開始調試。從加載項開始調試

如何開始從加載項進行調試?

這個函數mybe東西可以幫助

Function GetCommandArgsProperty() As EnvDTE.Property 
    Dim solution As Solution 
    Dim project As Project 
    Dim sb As SolutionBuild 
    Dim cm As ConfigurationManager 
    Dim config As Configuration 
    Dim properties As Properties 
    Dim prop As EnvDTE.Property 

    solution = _applicationObject.Solution 
    sb = solution.SolutionBuild 

    For Each str As String In sb.StartupProjects 
     project = solution.Item(str) 
     cm = project.ConfigurationManager 
     config = cm.ActiveConfiguration 
     properties = config.Properties 

     For Each prop In properties 
      If prop.Name = "CommandArguments" Then 
       Return prop 
      End If 
     Next 
    Next 
End Function 

回答

1

得到它的工作

 Dim dte As EnvDTE.DTE = GetService(GetType(EnvDTE.DTE)) 
     dte.Solution.SolutionBuild.Run()