ControlCollection.AddDropDownListContentControl أسلوب (ContentControl, String)
إضافة جديد DropDownListContentControlإلى مجموعة. عنصر التحكم الجديد هو استناداً الأصلي الذي التحكم في المحتوى هو مسبقاً في مستند.
مساحة الاسم: Microsoft.Office.Tools.Word
التجميع: Microsoft.Office.Tools.Word (في Microsoft.Office.Tools.Word.dll)
بناء الجملة
'إقرار
Function AddDropDownListContentControl ( _
contentControl As ContentControl, _
name As String _
) As DropDownListContentControl
DropDownListContentControl AddDropDownListContentControl(
ContentControl contentControl,
string name
)
المعلمات
- contentControl
النوع: Microsoft.Office.Interop.Word.ContentControl
Microsoft.Office.Interop.Word.ContentControlهو أساس الجديد عنصر تحكم.
- name
النوع: System.String
اسم جديد عنصر تحكم.
القيمة المُرجعة
النوع: Microsoft.Office.Tools.Word.DropDownListContentControl
DropDownListContentControlالتي تمت إضافتها إلى مستند.
استثناءات
استثناء: | شرط |
---|---|
ArgumentNullException | contentControl هو nullمرجع خالٍ (لا شيء في Visual Basic). -أو- nameهوnullمرجع خالٍ (لا شيء في Visual Basic)أو صفرية الطول. |
ControlNameAlreadyExistsException | عنصر تحكم بنفس الاسم هو موجود بالفعل في ControlCollection. |
ArgumentException | contentControlلا إنشاء? المعرض كتلة (هو Typeخاصية contentControlلا يحتوي القيمة Microsoft.Office.Interop.Word.WdContentControlType.wdContentControlDropdownList). |
ملاحظات
استخدام ترتيب هو طريقة لإضافة جديد DropDownListContentControlالتي هو استناداً إلى عنصر تحكم محتوى أصلي في مستند في وقت التشغيل. Th هو هو مفيداً عندما تقوم بإنشاء DropDownListContentControlفي وقت التشغيل، وكنت ترغب في إعادة إنشاء عنصر التحكم نفسه المرة القادمة مستند هو فتح. لمزيد من المعلومات، راجع إضافة عناصر إلى مستندات Office في وقت التشغيل.
أمثلة
إنشاء مثال التعليمة البرمجية التالية جديدة DropDownListContentControlلكل المنسدلة lهوt الأصلية التي هو في التطبيق.
Th هو الإصدار هو لتخصيص المستوى مستند. إلى استخدام هذا الرمز، قم بلصقه في إلى ThisDocumentالفئة في مشروع، واستدعاء CreateDropDownListControlsFromNativeControlsأسلوب من ThisDocument_Startupالأسلوب.
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
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);
}
}
}
Th هو الإصدار هو لالمستوى تطبيق الوظيفة الإضافية التي تستهدف .NET Framework 4. لاستخدام هذا الرمز، لصقه في ThisAddInالفئة في الخاص بك إضافة-في المشروع، واستدعاء CreateDropDownListControlsFromNativeControlsأسلوب من ThisAddIn_Startupالأسلوب.
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
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);
}
}
}
يلي تعليمات برمجية المثال، يتم إنشاء جديد DropDownListContentControlلكل الأصلية القائمة المنسدلة التي يضيفها مستخدم للتطبيق.
Th هو الإصدار هو لتخصيص المستوى مستند. لاستخدام هذا تعليمات برمجية، لصقه في ThisDocumentالفئة في مشروع الخاص بك. C#، يجب يرفق ThisDocument_DropDownListContentControlAfterAddمعالج الأحداث إلى ContentControlAfterAddحدث الخاص ThisDocumentفئة.
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
void ThisDocument_DropDownListContentControlAfterAdd(Word.ContentControl NewContentControl, bool InUndoRedo)
{
if (NewContentControl.Type == Word.WdContentControlType.wdContentControlDropdownList)
{
this.Controls.AddDropDownListContentControl(NewContentControl,
"DropDownListControl" + NewContentControl.ID);
}
}
Th هو الإصدار هو لالمستوى التطبيق الوظيفة الإضافية التي تستهدف .NET Framework 4. لاستخدام th هو التعليمات البرمجية، قم بلصقه داخل ThisAddInالفئة في مشروع الخاص بك. أيضا، يجب يرفق ActiveDocument_DropDownListContentControlAfterAddمعالج الأحداث إلى ContentControlAfterAddالأحداث من التطبيق النشط.
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
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);
}
}
أمن NET Framework.
- الثقة الكاملة للمتصل الفوري. يتعذر استخدام هذا العضو بواسطة التعليمات البرمجية الموثوق بها جزئيًا. لمزيد من المعلومات، راجع باستخدام مكتبات من تعليمات برمجية موثوق بها جزئي.
راجع أيضًَا
المرجع
AddDropDownListContentControl التحميل الزائد
Microsoft.Office.Tools.Word مساحة الاسم