Nota
O acesso a esta página requer autorização. Pode tentar iniciar sessão ou alterar os diretórios.
O acesso a esta página requer autorização. Pode tentar alterar os diretórios.
Retorna todos os controles de conteúdo do documento que têm a marca especificada.
Namespace: Microsoft.Office.Tools.Word
Assembly: Microsoft.Office.Tools.Word.v4.0.Utilities (em Microsoft.Office.Tools.Word.v4.0.Utilities.dll)
Sintaxe
'Declaração
Public Function SelectContentControlsByTag ( _
tag As String _
) As ContentControls
public ContentControls SelectContentControlsByTag(
string tag
)
Parâmetros
- tag
Tipo: System.String
A marca dos controles de conteúdo para retornar.
Valor de retorno
Tipo: Microsoft.Office.Interop.Word.ContentControls
A ContentControls coleção que contém os controles de conteúdo que têm a marca especificada.
Exemplos
O exemplo de código a seguir adiciona três parágrafos ao documento e, em seguida, adiciona um controle para cada novo parágrafo: a RichTextContentControl, a ComboBoxContentControl, and a DropDownListContentControl. O exemplo define as propriedades da marca e o título de cada controle. Em seguida, o código chama o SelectContentControlsByTag método para obter a coleção de controles de conteúdo nativos, cujo valor de marca é igual ao cliente e exibe o título de cada controle da coleção retornada em uma caixa de mensagem. Para usar esse exemplo, executá-lo do ThisDocument a classe em um projeto de nível de documento.
Private Sub ContentControlsTag()
Dim par1 As Word.Paragraph = Me.Paragraphs.Add()
Dim richTextControl As _
Microsoft.Office.Tools.Word.RichTextContentControl = _
Me.Controls.AddRichTextContentControl(par1.Range, "richTextControl")
richTextControl.Tag = "Customer"
richTextControl.Title = "Customer Name"
Dim par2 As Word.Paragraph = Me.Paragraphs.Add()
Dim comboBoxControl As _
Microsoft.Office.Tools.Word.ComboBoxContentControl = _
Me.Controls.AddComboBoxContentControl(par2.Range, "comboBoxControl")
comboBoxControl.Tag = "Customer"
comboBoxControl.Title = "Customer Title"
Dim par3 As Word.Paragraph = Me.Paragraphs.Add()
Dim dropDownListControl As _
Microsoft.Office.Tools.Word.DropDownListContentControl = _
Me.Controls.AddDropDownListContentControl(par3.Range, _
"dropDownListControl")
dropDownListControl.Tag = "Products"
dropDownListControl.Title = "List of Products"
Dim relatedControls As Word.ContentControls = _
Me.SelectContentControlsByTag("Customer")
MessageBox.Show("Displaying all controls with a Tag value of" + _
" 'Customer'. Click OK to continue.")
For Each ctrl As Word.ContentControl In relatedControls
MessageBox.Show("Control title: " + ctrl.Title)
Next
End Sub
private void ContentControlsTag()
{
Word.Paragraph par1 = this.Paragraphs.Add(ref missing);
Microsoft.Office.Tools.Word.RichTextContentControl richTextControl =
this.Controls.AddRichTextContentControl(par1.Range,
"richTextControl");
richTextControl.Tag = "Customer";
richTextControl.Title = "Customer Name";
Word.Paragraph par2 = this.Paragraphs.Add(ref missing);
Microsoft.Office.Tools.Word.ComboBoxContentControl comboBoxControl =
this.Controls.AddComboBoxContentControl(par2.Range,
"comboBoxControl");
comboBoxControl.Tag = "Customer";
comboBoxControl.Title = "Customer Title";
Word.Paragraph par3 = this.Paragraphs.Add(ref missing);
Microsoft.Office.Tools.Word.DropDownListContentControl
dropDownListControl = this.Controls.AddDropDownListContentControl(
par3.Range, "dropDownListControl");
dropDownListControl.Tag = "Products";
dropDownListControl.Title = "List of Products";
Word.ContentControls relatedControls =
this.SelectContentControlsByTag("Customer");
MessageBox.Show("Displaying all controls with a Tag value of" +
" 'Customer'. Click OK to continue.");
foreach (Word.ContentControl ctrl in relatedControls)
{
MessageBox.Show("Control title: " + ctrl.Title);
}
}
Segurança do .NET Framework
- Confiança total para o chamador imediato. O membro não pode ser usado por código parcialmente confiável. Para obter mais informações, consulte Usando bibliotecas de código parcialmente confiáveis.