Compartilhar via


Process.Programs Property

Definition

Gets the collection of programs that are being managed by this process.

public:
 property EnvDTE::Programs ^ Programs { EnvDTE::Programs ^ get(); };
[System.Runtime.InteropServices.DispId(101)]
public EnvDTE.Programs Programs { [System.Runtime.InteropServices.DispId(101)] get; }
[<System.Runtime.InteropServices.DispId(101)>]
[<get: System.Runtime.InteropServices.DispId(101)>]
member this.Programs : EnvDTE.Programs
Public ReadOnly Property Programs As Programs

Property Value

A Programs collection.

Attributes

Examples

The following example demonstrates how to use the Programs property.

public static void Programs(DTE dte)  
{  
    // Setup debug Output window.  
    Window w = (Window)dte.Windows.Item(EnvDTE.Constants.vsWindowKindOutput);  
    w.Visible = true;  
    OutputWindow ow = (OutputWindow)w.Object;  
    OutputWindowPane owp = ow.OutputWindowPanes.Add("Programs Property Test");  
    owp.Activate();  
    owp.OutputString("\nEdition of the environment: " +   
                        dte.Debugger.DebuggedProcesses.Item(1).DTE.Edition);  
    owp.OutputString("\nThe name of the current program: " +   
                        dte.Debugger.DebuggedProcesses.Item(1).Name);  
    owp.OutputString("\nThe name of the current program: " +   
                        dte.Debugger.DebuggedProcesses.Item(1).Parent.CurrentProgram.Name);  
    owp.OutputString("\nProcess ID: " +   
                        dte.Debugger.DebuggedProcesses.Item(1).ProcessID);  
    EnvDTE.Programs programs =   
                        dte.Debugger.DebuggedProcesses.Item(1).Programs;  
    owp.OutputString("\nThe name of the current program: " +   
                        programs.Item(1).Name);  
}  
Shared Sub Programs(ByRef dte As EnvDTE.DTE)  
    Dim str As String  
    Dim processes As EnvDTE.Processes = dte.Debugger.DebuggedProcesses  
    str = "Edition of the environment: " + processes.Item(1).DTE.Edition  
    str += vbCrLf + "The name of the current program: " + _  
           processes.Item(1).Name  
    str += vbCrLf + "The name of the current program: " + _  
           processes.Item(1).Parent.CurrentProgram.Name  
    str += vbCrLf + "Process ID: " + processes.Item(1).ProcessID.ToString()  
    str += vbCrLf + "The name of the current program: " + _  
           processes.Item(1).Programs.Item(1).Name  
    MessageBox.Show(str, "Programs Property Test")  
End Sub  

Applies to