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


Action.BeforeCaptionShow Событие (2007 System)

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

Возникает после того, как пользователь щелкает значок смарт-тега, и перед отображением меню смарт-тега.

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

Синтаксис

'Декларация
Public Event BeforeCaptionShow As BeforeCaptionShowEventHandler
'Применение
Dim instance As Action
Dim handler As BeforeCaptionShowEventHandler

AddHandler instance.BeforeCaptionShow, handler
public event BeforeCaptionShowEventHandler BeforeCaptionShow

Заметки

Это событие позволяет изменять заголовок смарт-тега в зависимости от контекста.

Дополнительные сведения об обработке событий см. в разделе Прием событий.

Примеры

В приведенном ниже примере кода демонстрируется обработчик события BeforeCaptionShow. Обработчик событий изменяет заголовок меню действия. Данный пример кода является частью большого примера, приведенного в описании класса Action.

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

Private Sub OpenMessageBox_BeforeCaptionShow(ByVal sender As Object, _
    ByVal e As Microsoft.Office.Tools.Word.ActionEventArgs) _
    Handles DisplayAddress.BeforeCaptionShow

    Dim clickedAction As Microsoft.Office.Tools.Word.Action = _
        TryCast(sender, Microsoft.Office.Tools.Word.Action)

    If clickedAction IsNot Nothing Then
        clickedAction.Caption = "Display the location of " & e.Text
    End If
End Sub
void displayAddress_BeforeCaptionShow(object sender,
    Microsoft.Office.Tools.Word.ActionEventArgs e)
{
    Microsoft.Office.Tools.Word.Action clickedAction =
        sender as Microsoft.Office.Tools.Word.Action;

    if (clickedAction != null)
    {
        clickedAction.Caption = "Display the location of " +
            e.Text;
    }
}

Разрешения

См. также

Ссылки

Action Класс

Action - члены

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