OutputWindowPane.Clear メソッド

[アーティクル]
08/22/2008

更新 : 2007 年 11 月

OutputWindowPane のすべてのテキストを消去します。

名前空間 : EnvDTE
アセンブリ : EnvDTE (EnvDTE.dll 内)

構文

'宣言
Sub Clear
'使用
Dim instance As OutputWindowPane

instance.Clear()

void Clear()

void Clear()

function Clear()

解説

単一のペインのすべてのテキストを消去します。

例

Sub ClearExample(ByVal dte As DTE2)

    ' Retrieve the Output window.
    Dim outputWin As OutputWindow = dte.ToolWindows.OutputWindow

    ' Find the "Test Pane" Output window pane; if it does not exist, 
    ' create it.
    Dim pane As OutputWindowPane
    Try
        pane = outputWin.OutputWindowPanes.Item("Test Pane")
    Catch
        pane = outputWin.OutputWindowPanes.Add("Test Pane")
    End Try

    ' Show the Output window and activate the new pane.
    outputWin.Parent.AutoHides = False
    outputWin.Parent.Activate()
    pane.Activate()

    ' Add a line of text to the new pane.
    pane.OutputString("Some text." & vbCrLf)

    If MsgBox("Clear the Output window pane?", MsgBoxStyle.YesNo) = _
        MsgBoxResult.Yes Then
        pane.Clear()
    End If

End Sub

public void ClearExample(DTE2 dte)
{
    // Retrieve the Output window.
    OutputWindow outputWin = dte.ToolWindows.OutputWindow;

    // Find the "Test Pane" Output window pane; if it doesn't exist, 
    // create it.
    OutputWindowPane pane = null;
    try
    {
        pane = outputWin.OutputWindowPanes.Item("Test Pane");
    }
    catch
    {
        pane = outputWin.OutputWindowPanes.Add("Test Pane");
    }

    // Show the Output window and activate the new pane.
    outputWin.Parent.AutoHides = false;
    outputWin.Parent.Activate();
    pane.Activate();

    // Add a line of text to the new pane.
    pane.OutputString("Some text." + "\r\n");

    if (MessageBox.Show("Clear the Output window pane?", "", 
        MessageBoxButtons.YesNo) == DialogResult.Yes)
        pane.Clear();
}