ControlCollection.AddPictureContentControl أسلوب (Range, String)

مقالة
09/21/2010

قم بإضافة جديد PictureContentControlفي النطاق المحدد في مستند.

مساحة الاسم: Microsoft.Office.Tools.Word
التجميع: Microsoft.Office.Tools.Word (في Microsoft.Office.Tools.Word.dll)

بناء الجملة

'إقرار
Function AddPictureContentControl ( _
    range As Range, _
    name As String _
) As PictureContentControl

PictureContentControl AddPictureContentControl(
    Range range,
    string name
)

المعلمات

range
النوع: Microsoft.Office.Interop.Word.Range
Rangeوالذي يوفر الحدود الجديد عنصر تحكم.

name
النوع: System.String
اسم جديد عنصر تحكم.

القيمة المُرجعة

النوع: Microsoft.Office.Tools.Word.PictureContentControl
PictureContentControlالتي تمت إضافتها إلى مستند.

استثناءات

استثناء:	شرط
ArgumentNullException	nameهوnullمرجع خالٍ (لا شيء في Visual Basic)أو صفرية الطول.
ControlNameAlreadyExistsException	عنصر تحكم بنفس الاسم هو موجود بالفعل في ControlCollection.

ملاحظات

استخدم هذا الأسلوب إلى إضافة جديد PictureContentControlفي نطاق معين في مستند في وقت التشغيل. لمزيد من المعلومات، راجع إضافة عناصر إلى مستندات Office في وقت التشغيل.

أمثلة

يلي تعليمات برمجية في المثال إضافة جديد PictureContentControlإلى بداية مستند. يفترض هذا المثال وجود ملف يسمى صورة.bmp في المجلد "مستندات"%UserProfile%\My (لنظام التشغيل ‏‫نظام التشغيل Windows XP و سابقا) أو في مجلد%UserProfile%\مستندات (لنظام التشغيل ‏‫Windows Vista).

Th هو الإصدار هو لتخصيص المستوى مستند. إلى استخدام هذا الرمز، قم بلصقه في إلى ThisDocumentالفئة في مشروع، واستدعاء AddPictureControlAtRangeأسلوب من ThisDocument_Startupالأسلوب.

Dim pictureControl2 As Microsoft.Office.Tools.Word.PictureContentControl
Dim bitmap2 As System.Drawing.Bitmap

Private Sub AddPictureControlAtRange()
    Me.Paragraphs(1).Range.InsertParagraphBefore()
    pictureControl2 = Me.Controls.AddPictureContentControl(Me.Paragraphs(1).Range, "pictureControl2")
    Dim imagePath As String = My.Computer.FileSystem.SpecialDirectories.MyDocuments & _
            "\picture.bmp"
    bitmap2 = New System.Drawing.Bitmap(imagePath, True)
    pictureControl2.Image = bitmap2
End Sub

private Microsoft.Office.Tools.Word.PictureContentControl pictureControl2;
private System.Drawing.Bitmap bitmap2;

private void AddPictureControlAtRange()
{
    this.Paragraphs[1].Range.InsertParagraphBefore();
    pictureControl2 = this.Controls.AddPictureContentControl(
        this.Paragraphs[1].Range, "pictureControl2");

    string imagePath = System.Environment.GetFolderPath(
        Environment.SpecialFolder.MyDocuments) + "\\picture.bmp";
    bitmap2 = new System.Drawing.Bitmap(imagePath, true);
    pictureControl2.Image = bitmap2;
}

Th هو الإصدار هو لالمستوى تطبيق الوظيفة الإضافية التي تستهدف .NET Framework 4. إلى استخدام هذا الرمز، قم بلصقه في إلى ThisAddInالفئة في مشروع، واستدعاء AddPictureControlAtRangeأسلوب من ThisAddIn_Startupالأسلوب.

Dim pictureControl2 As Microsoft.Office.Tools.Word.PictureContentControl
Dim bitmap2 As System.Drawing.Bitmap

Private Sub AddPictureControlAtRange()
    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()
    pictureControl2 = vstoDoc.Controls.AddPictureContentControl( _
        vstoDoc.Paragraphs(1).Range, "pictureControl2")
    Dim imagePath As String = My.Computer.FileSystem.SpecialDirectories.MyDocuments & _
            "\picture.bmp"
    bitmap2 = New System.Drawing.Bitmap(imagePath, True)
    pictureControl2.Image = bitmap2
End Sub

private Microsoft.Office.Tools.Word.PictureContentControl pictureControl2;
private System.Drawing.Bitmap bitmap2;

private void AddPictureControlAtRange()
{
    if (this.Application.ActiveDocument == null)
        return;

    Document vstoDoc = Globals.Factory.GetVstoObject(this.Application.ActiveDocument);
    vstoDoc.Paragraphs[1].Range.InsertParagraphBefore();
    pictureControl2 = vstoDoc.Controls.AddPictureContentControl(
        vstoDoc.Paragraphs[1].Range, "pictureControl2");

    string imagePath = System.Environment.GetFolderPath(
        Environment.SpecialFolder.MyDocuments) + "\\picture.bmp";
    bitmap2 = new System.Drawing.Bitmap(imagePath, true);
    pictureControl2.Image = bitmap2;
}

أمن NET Framework.

الثقة الكاملة للمتصل الفوري. يتعذر استخدام هذا العضو بواسطة التعليمات البرمجية الموثوق بها جزئيًا. لمزيد من المعلومات، راجع باستخدام مكتبات من تعليمات برمجية موثوق بها جزئي.