ControlCollection.AddDropDownListContentControl Метод
Определение
Важно!
Некоторые сведения относятся к предварительной версии продукта, в которую до выпуска могут быть внесены существенные изменения. Майкрософт не предоставляет никаких гарантий, явных или подразумеваемых, относительно приведенных здесь сведений.
Перегрузки
AddDropDownListContentControl(String) |
Добавляет новый элемент управления DropDownListContentControl в выделенном фрагменте документа. |
AddDropDownListContentControl(ContentControl, String) |
Добавляет в коллекцию новый объект DropDownListContentControl. Новый элемент управления, основанный на собственном элементе управления содержимым в документе. |
AddDropDownListContentControl(Range, String) |
Добавляет новый объект DropDownListContentControl в указанный диапазон в документе. |
AddDropDownListContentControl(String)
Добавляет новый элемент управления DropDownListContentControl в выделенном фрагменте документа.
public:
Microsoft::Office::Tools::Word::DropDownListContentControl ^ AddDropDownListContentControl(System::String ^ name);
public Microsoft.Office.Tools.Word.DropDownListContentControl AddDropDownListContentControl (string name);
abstract member AddDropDownListContentControl : string -> Microsoft.Office.Tools.Word.DropDownListContentControl
Public Function AddDropDownListContentControl (name As String) As DropDownListContentControl
Параметры
- name
- String
Имя нового элемента управления.
Возвращаемое значение
Объект DropDownListContentControl, добавленный в документ.
Исключения
name
имеет значение null
или нулевую длину.
Элемент управления с таким именем уже содержится в ControlCollection.
Примеры
В следующем примере кода добавляется новый DropDownListContentControl объект в начало документа. В примере также добавляются имена нескольких дней в список элементов, которые пользователи могут выбрать в элементе управления .
Эта версия предназначена для настройки на уровне документа. Чтобы использовать этот код, вставьте его в ThisDocument
класс в проекте и вызовите AddDropDownListControlAtSelection
метод из ThisDocument_Startup
метода .
private Microsoft.Office.Tools.Word.DropDownListContentControl dropDownListControl1;
private void AddDropDownListControlAtSelection()
{
this.Paragraphs[1].Range.InsertParagraphBefore();
this.Paragraphs[1].Range.Select();
dropDownListControl1 = this.Controls.AddDropDownListContentControl("dropDownListControl1");
dropDownListControl1.DropDownListEntries.Add("Monday", "Monday", 0);
dropDownListControl1.DropDownListEntries.Add("Tuesday", "Tuesday", 1);
dropDownListControl1.DropDownListEntries.Add("Wednesday", "Wednesday", 2);
dropDownListControl1.PlaceholderText = "Choose a day";
}
Dim dropDownListControl1 As Microsoft.Office.Tools.Word.DropDownListContentControl
Private Sub AddDropDownListControlAtSelection()
Me.Paragraphs(1).Range.InsertParagraphBefore()
Me.Paragraphs(1).Range.Select()
dropDownListControl1 = Me.Controls.AddDropDownListContentControl("dropDownListControl1")
With dropDownListControl1
.DropDownListEntries.Add("Monday", "Monday", 0)
.DropDownListEntries.Add("Tuesday", "Tuesday", 1)
.DropDownListEntries.Add("Wednesday", "Wednesday", 2)
.PlaceholderText = "Choose a day"
End With
End Sub
Эта версия предназначена для надстройки уровня приложения, предназначенной для платформа .NET Framework 4 или платформа .NET Framework 4.5. Чтобы использовать этот код, вставьте его в ThisAddIn
класс в проекте и вызовите AddDropDownListControlAtSelection
метод из ThisAddIn_Startup
метода .
private Microsoft.Office.Tools.Word.DropDownListContentControl dropDownListControl1;
private void AddDropDownListControlAtSelection()
{
if (this.Application.ActiveDocument == null)
return;
Document vstoDoc = Globals.Factory.GetVstoObject(this.Application.ActiveDocument);
vstoDoc.Paragraphs[1].Range.InsertParagraphBefore();
vstoDoc.Paragraphs[1].Range.Select();
dropDownListControl1 = vstoDoc.Controls.AddDropDownListContentControl("dropDownListControl1");
dropDownListControl1.DropDownListEntries.Add("Monday", "Monday", 0);
dropDownListControl1.DropDownListEntries.Add("Tuesday", "Tuesday", 1);
dropDownListControl1.DropDownListEntries.Add("Wednesday", "Wednesday", 2);
dropDownListControl1.PlaceholderText = "Choose a day";
}
Dim dropDownListControl1 As Microsoft.Office.Tools.Word.DropDownListContentControl
Private Sub AddDropDownListControlAtSelection()
If Me.Application.ActiveDocument Is Nothing Then
Return
End If
Dim vstoDoc As Document = Globals.Factory.GetVstoObject(Me.Application.ActiveDocument)
vstoDoc.Paragraphs(1).Range.InsertParagraphBefore()
vstoDoc.Paragraphs(1).Range.Select()
dropDownListControl1 = vstoDoc.Controls.AddDropDownListContentControl("dropDownListControl1")
With dropDownListControl1
.DropDownListEntries.Add("Monday", "Monday", 0)
.DropDownListEntries.Add("Tuesday", "Tuesday", 1)
.DropDownListEntries.Add("Wednesday", "Wednesday", 2)
.PlaceholderText = "Choose a day"
End With
End Sub
Комментарии
Используйте этот метод, чтобы добавить новый DropDownListContentControl объект в текущем выделенном фрагменте документа во время выполнения. Для получения дополнительной информации см. Adding Controls to Office Documents at Run Time.
Применяется к
AddDropDownListContentControl(ContentControl, String)
Добавляет в коллекцию новый объект DropDownListContentControl. Новый элемент управления, основанный на собственном элементе управления содержимым в документе.
public:
Microsoft::Office::Tools::Word::DropDownListContentControl ^ AddDropDownListContentControl(Microsoft::Office::Interop::Word::ContentControl ^ contentControl, System::String ^ name);
public Microsoft.Office.Tools.Word.DropDownListContentControl AddDropDownListContentControl (Microsoft.Office.Interop.Word.ContentControl contentControl, string name);
abstract member AddDropDownListContentControl : Microsoft.Office.Interop.Word.ContentControl * string -> Microsoft.Office.Tools.Word.DropDownListContentControl
Public Function AddDropDownListContentControl (contentControl As ContentControl, name As String) As DropDownListContentControl
Параметры
- contentControl
- ContentControl
Объект ContentControl, который является основой для нового элемента управления.
- name
- String
Имя нового элемента управления.
Возвращаемое значение
Объект DropDownListContentControl, добавленный в документ.
Исключения
contentControl
имеет null
значение .-or- name
is null
или имеет нулевую длину.
Элемент управления с таким именем уже содержится в ControlCollection.
contentControl
не является коллекцией стандартных блоков (то есть Type свойство contentControl
не имеет значения Microsoft.Office.Interop.Word. WdContentControlType.wdContentControlDropdownList).
Примеры
В следующем примере кода создается новый DropDownListContentControl для каждого раскрывающегося списка машинного кода, который находится в документе.
Эта версия предназначена для настройки на уровне документа. Чтобы использовать этот код, вставьте его в ThisDocument
класс в проекте и вызовите CreateDropDownListControlsFromNativeControls
метод из ThisDocument_Startup
метода .
private System.Collections.Generic.List
<Microsoft.Office.Tools.Word.DropDownListContentControl> dropDownControls;
private void CreateDropDownListControlsFromNativeControls()
{
if (this.ContentControls.Count <= 0)
return;
dropDownControls = new System.Collections.Generic.List
<Microsoft.Office.Tools.Word.DropDownListContentControl>();
int count = 0;
foreach (Word.ContentControl nativeControl in this.ContentControls)
{
if (nativeControl.Type == Word.WdContentControlType.wdContentControlDropdownList)
{
count++;
Microsoft.Office.Tools.Word.DropDownListContentControl tempControl =
this.Controls.AddDropDownListContentControl(nativeControl,
"VSTODropDownListContentControl" + count.ToString());
dropDownControls.Add(tempControl);
}
}
}
Private dropDownListControls As New System.Collections.Generic.List _
(Of Microsoft.Office.Tools.Word.DropDownListContentControl)
Private Sub CreateDropDownListControlsFromNativeControls()
If Me.ContentControls.Count <= 0 Then
Return
End If
Dim count As Integer = 0
For Each nativeControl As Word.ContentControl In Me.ContentControls
If nativeControl.Type = Word.WdContentControlType.wdContentControlDropdownList Then
count += 1
Dim tempControl As Microsoft.Office.Tools.Word.DropDownListContentControl = _
Me.Controls.AddDropDownListContentControl(nativeControl, _
"VSTODropDownListContentControl" + count.ToString())
dropDownListControls.Add(tempControl)
End If
Next nativeControl
End Sub
Эта версия предназначена для надстройки уровня приложения, предназначенной для платформа .NET Framework 4 или платформа .NET Framework 4.5. Чтобы использовать этот код, вставьте его в ThisAddIn
класс в проекте надстройки CreateDropDownListControlsFromNativeControls
и вызовите метод из ThisAddIn_Startup
метода .
private System.Collections.Generic.List
<Microsoft.Office.Tools.Word.DropDownListContentControl> dropDownControls;
private void CreateDropDownListControlsFromNativeControls()
{
if (this.Application.ActiveDocument == null)
return;
Document vstoDoc = Globals.Factory.GetVstoObject(this.Application.ActiveDocument);
if (vstoDoc.ContentControls.Count <= 0)
return;
dropDownControls = new System.Collections.Generic.List
<Microsoft.Office.Tools.Word.DropDownListContentControl>();
int count = 0;
foreach (Word.ContentControl nativeControl in vstoDoc.ContentControls)
{
if (nativeControl.Type == Word.WdContentControlType.wdContentControlDropdownList)
{
count++;
Microsoft.Office.Tools.Word.DropDownListContentControl tempControl =
vstoDoc.Controls.AddDropDownListContentControl(nativeControl,
"VSTODropDownListContentControl" + count.ToString());
dropDownControls.Add(tempControl);
}
}
}
Private dropDownListControls As New System.Collections.Generic.List _
(Of Microsoft.Office.Tools.Word.DropDownListContentControl)
Private Sub CreateDropDownListControlsFromNativeControls()
If Me.Application.ActiveDocument Is Nothing Then
Return
End If
Dim vstoDoc As Document = Globals.Factory.GetVstoObject(Me.Application.ActiveDocument)
If vstoDoc.ContentControls.Count <= 0 Then
Return
End If
Dim count As Integer = 0
For Each nativeControl As Word.ContentControl In vstoDoc.ContentControls
If nativeControl.Type = Word.WdContentControlType.wdContentControlDropdownList Then
count += 1
Dim tempControl As Microsoft.Office.Tools.Word.DropDownListContentControl = _
vstoDoc.Controls.AddDropDownListContentControl(nativeControl, _
"VSTODropDownListContentControl" + count.ToString())
dropDownListControls.Add(tempControl)
End If
Next nativeControl
End Sub
В следующем примере кода создается новый DropDownListContentControl для каждого раскрывающегося списка машинного кода, добавляемого пользователем в документ.
Эта версия предназначена для настройки на уровне документа. Чтобы использовать этот код, вставьте его в ThisDocument
класс в проекте. Для C# необходимо также прикрепить ThisDocument_DropDownListContentControlAfterAdd
обработчик событий к событию ContentControlAfterAddThisDocument
класса .
void ThisDocument_DropDownListContentControlAfterAdd(Word.ContentControl NewContentControl, bool InUndoRedo)
{
if (NewContentControl.Type == Word.WdContentControlType.wdContentControlDropdownList)
{
this.Controls.AddDropDownListContentControl(NewContentControl,
"DropDownListControl" + NewContentControl.ID);
}
}
Private Sub ThisDocument_DropDownListContentControlAfterAdd(ByVal NewContentControl As Word.ContentControl, _
ByVal InUndoRedo As Boolean) Handles Me.ContentControlAfterAdd
If NewContentControl.Type = Word.WdContentControlType.wdContentControlDropdownList Then
Me.Controls.AddDropDownListContentControl(NewContentControl, _
"DropDownListControl" + NewContentControl.ID)
End If
End Sub
Эта версия предназначена для надстройки уровня приложения, предназначенной для платформа .NET Framework 4 или платформа .NET Framework 4.5. Чтобы использовать этот код, вставьте его в ThisAddIn
класс в проекте. Кроме того, необходимо прикрепить ActiveDocument_DropDownListContentControlAfterAdd
обработчик событий к событию ContentControlAfterAdd активного документа.
void ActiveDocument_DropDownListContentControlAfterAdd(
Word.ContentControl NewContentControl, bool InUndoRedo)
{
Document vstoDoc = Globals.Factory.GetVstoObject(this.Application.ActiveDocument);
if (NewContentControl.Type == Word.WdContentControlType.wdContentControlDropdownList)
{
vstoDoc.Controls.AddDropDownListContentControl(NewContentControl,
"DropDownListControl" + NewContentControl.ID);
}
}
Private Sub ActiveDocument_DropDownListContentControlAfterAdd( _
ByVal NewContentControl As Word.ContentControl, _
ByVal InUndoRedo As Boolean)
Dim vstoDoc As Document = Globals.Factory.GetVstoObject(Me.Application.ActiveDocument)
If NewContentControl.Type = Word.WdContentControlType. _
wdContentControlDropdownList Then
vstoDoc.Controls.AddDropDownListContentControl(NewContentControl, _
"DropDownListControl" + NewContentControl.ID)
End If
End Sub
Комментарии
Используйте этот метод для добавления нового DropDownListContentControl объекта, основанного на собственном элементе управления содержимым, в документе во время выполнения. Это полезно при создании DropDownListContentControl во время выполнения и при следующем открытии документа необходимо повторно создать тот же элемент управления. Для получения дополнительной информации см. Adding Controls to Office Documents at Run Time.
Применяется к
AddDropDownListContentControl(Range, String)
Добавляет новый объект DropDownListContentControl в указанный диапазон в документе.
public:
Microsoft::Office::Tools::Word::DropDownListContentControl ^ AddDropDownListContentControl(Microsoft::Office::Interop::Word::Range ^ range, System::String ^ name);
public Microsoft.Office.Tools.Word.DropDownListContentControl AddDropDownListContentControl (Microsoft.Office.Interop.Word.Range range, string name);
abstract member AddDropDownListContentControl : Microsoft.Office.Interop.Word.Range * string -> Microsoft.Office.Tools.Word.DropDownListContentControl
Public Function AddDropDownListContentControl (range As Range, name As String) As DropDownListContentControl
Параметры
- name
- String
Имя нового элемента управления.
Возвращаемое значение
Объект DropDownListContentControl, добавленный в документ.
Исключения
name
имеет значение null
или нулевую длину.
Элемент управления с таким именем уже содержится в ControlCollection.
Примеры
В следующем примере кода добавляется новый DropDownListContentControl объект в начало документа. В примере также добавляются имена нескольких дней в список элементов, которые пользователи могут выбрать в элементе управления .
Эта версия предназначена для настройки на уровне документа. Чтобы использовать этот код, вставьте его в ThisDocument
класс в проекте и вызовите AddDropDownListControlAtRange
метод из ThisDocument_Startup
метода .
private Microsoft.Office.Tools.Word.DropDownListContentControl dropDownListControl2;
private void AddDropDownListControlAtRange()
{
this.Paragraphs[1].Range.InsertParagraphBefore();
dropDownListControl2 = this.Controls.AddDropDownListContentControl(this.Paragraphs[1].Range,
"dropDownListControl2");
dropDownListControl2.DropDownListEntries.Add("Monday", "Monday", 0);
dropDownListControl2.DropDownListEntries.Add("Tuesday", "Tuesday", 1);
dropDownListControl2.DropDownListEntries.Add("Wednesday", "Wednesday", 2);
dropDownListControl2.PlaceholderText = "Choose a day";
}
Dim dropDownListControl2 As Microsoft.Office.Tools.Word.DropDownListContentControl
Private Sub AddDropDownListControlAtRange()
Me.Paragraphs(1).Range.InsertParagraphBefore()
dropDownListControl2 = Me.Controls.AddDropDownListContentControl(Me.Paragraphs(1).Range, _
"dropDownListControl2")
With dropDownListControl2
.DropDownListEntries.Add("Monday", "Monday", 0)
.DropDownListEntries.Add("Tuesday", "Tuesday", 1)
.DropDownListEntries.Add("Wednesday", "Wednesday", 2)
.PlaceholderText = "Choose a day"
End With
End Sub
Эта версия предназначена для надстройки уровня приложения, предназначенной для платформа .NET Framework 4 или платформа .NET Framework 4.5. Чтобы использовать этот код, вставьте его в ThisAddIn
класс в проекте и вызовите AddDropDownListControlAtRange
метод из ThisAddIn_Startup
метода .
private Microsoft.Office.Tools.Word.DropDownListContentControl dropDownListControl2;
private void AddDropDownListControlAtRange()
{
if (this.Application.ActiveDocument == null)
return;
Document vstoDoc = Globals.Factory.GetVstoObject(this.Application.ActiveDocument);
vstoDoc.Paragraphs[1].Range.InsertParagraphBefore();
dropDownListControl2 = vstoDoc.Controls.AddDropDownListContentControl(
vstoDoc.Paragraphs[1].Range,
"dropDownListControl2");
dropDownListControl2.DropDownListEntries.Add("Monday", "Monday", 0);
dropDownListControl2.DropDownListEntries.Add("Tuesday", "Tuesday", 1);
dropDownListControl2.DropDownListEntries.Add("Wednesday", "Wednesday", 2);
dropDownListControl2.PlaceholderText = "Choose a day";
}
Dim dropDownListControl2 As Microsoft.Office.Tools.Word.DropDownListContentControl
Private Sub AddDropDownListControlAtRange()
If Me.Application.ActiveDocument Is Nothing Then
Return
End If
Dim vstoDoc As Document = Globals.Factory.GetVstoObject(Me.Application.ActiveDocument)
vstoDoc.Paragraphs(1).Range.InsertParagraphBefore()
dropDownListControl2 = vstoDoc.Controls.AddDropDownListContentControl( _
vstoDoc.Paragraphs(1).Range, _
"dropDownListControl2")
With dropDownListControl2
.DropDownListEntries.Add("Monday", "Monday", 0)
.DropDownListEntries.Add("Tuesday", "Tuesday", 1)
.DropDownListEntries.Add("Wednesday", "Wednesday", 2)
.PlaceholderText = "Choose a day"
End With
End Sub
Комментарии
Используйте этот метод для добавления нового DropDownListContentControl объекта в указанном диапазоне в документе во время выполнения. Для получения дополнительной информации см. Adding Controls to Office Documents at Run Time.