Button.Delete Метод (2007 System)

Статья
11/16/2008

Обновлен: Ноябрь 2007

Удаляет динамически созданный объект Button из рабочего листа, а затем удаляет его из коллекции ControlCollection.

Пространство имен: Microsoft.Office.Tools.Excel.Controls
Сборка: Microsoft.Office.Tools.Excel.v9.0 (в Microsoft.Office.Tools.Excel.v9.0.dll)

Синтаксис

'Декларация
Public Function Delete As Object
'Применение
Dim instance As Button
Dim returnValue As Object

returnValue = instance.Delete()

public Object Delete()

Возвращаемое значение

Тип: System.Object

Заметки

Этот метод следует использовать только с элементом управления Button, созданным программным способом во время выполнения. Если этот метод вызывается для объекта Button, добавленного в рабочий лист во время разработки, возникает исключение.

Примеры

В следующем примере показан элемента управления Button копирующийся в буфер обмена, когда пользователь щелкает по нему. Обработчик событий кнопкиClick вызывает метод CopyPicture копирования кнопки в буфер обмена в виде точечного рисунка. Обработчик событий также запрашивает данные у пользователя для определения места появления исходной кнопки вызовом метода Delete.

В этом примере демонстрируется настройка уровня документа.

Private Sub CopyControlAsPicture()
    Dim CopyButton As Microsoft.Office.Tools.Excel.Controls.Button = _
        Me.Controls.AddButton(Me.Range("B2", "D3"), "CopyButton")

    CopyButton.Text = "Click to copy this control"
    AddHandler CopyButton.Click, AddressOf copyButtonPicture_Click
End Sub


Private Sub CopyButtonPicture_Click(ByVal sender As Object, ByVal e As EventArgs)
    Dim ClickedButton As Microsoft.Office.Tools.Excel.Controls.Button = _
        CType(sender, Microsoft.Office.Tools.Excel.Controls.Button)

    If False = CBool( _
        ClickedButton.CopyPicture(Excel.XlPictureAppearance.xlScreen, _
        Excel.XlCopyPictureFormat.xlBitmap)) Then
        MsgBox("CopyPicture failed")
    End If
End Sub

private void CopyControlAsPicture()
{
    Microsoft.Office.Tools.Excel.Controls.Button copyButton =
        this.Controls.AddButton(this.Range["B2", "D3"],
        "copyButton");

    copyButton.Text = "Click to copy this control";
    copyButton.Click += new EventHandler(copyButtonPicture_Click);
}

void copyButtonPicture_Click(object sender, EventArgs e)
{
    Microsoft.Office.Tools.Excel.Controls.Button clickedButton =
        (Microsoft.Office.Tools.Excel.Controls.Button)sender;

    if (false == (bool)clickedButton.CopyPicture(
        Excel.XlPictureAppearance.xlScreen,
        Excel.XlCopyPictureFormat.xlBitmap))
    {
        MessageBox.Show("CopyPicture failed");
    }
}

Разрешения

Полное доверие для непосредственно вызывающего метода. Этот член не может быть использован частично доверенным кодом. Дополнительные сведения см. в разделе Использование библиотек из не вполне надежного кода.

См. также

Ссылки

Button Класс

Button - члены

Microsoft.Office.Tools.Excel.Controls - пространство имен

Поделиться через