مشاركة عبر

ControlCollection.GetInlineShapeForControl أسلوب

  • مقالة

يحصل على المصدر InlineShapeللمحدد عنصر تحكم.

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

بناء الجملة

'إقرار
Function GetInlineShapeForControl ( _
    control As Control _
) As InlineShape

InlineShape GetInlineShapeForControl(
    Control control
)

المعلمات

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

النوع: Microsoft.Office.Interop.Word.InlineShape
الأساسي InlineShapeللمحدد عنصر تحكم.

ملاحظات

إذا كانت النمط الالتفاف لعنصر التحكم غير معينة إلى سطري مع نص ، GetInlineShapeForControlالأسلوب بإرجاع nullمرجع خالٍ (لا شيء في Visual Basic).

أمثلة

مثال التعليمة البرمجية التالية يضيف Buttonإلى المستند حيث به النمط الالتفاف موضعي مع نص. تعليمات برمجية ثم استدعاء GetInlineShapeForControlطريقة للحصول على الالموقع عنصر تحكم من المصدر الخاص به InlineShape.

Private Sub WordGetInlineShape()
    Dim testButton As Microsoft.Office.Tools.Word.Controls.Button = _
        Me.Controls.AddButton(Me.Paragraphs(1).Range, 50, 25, "testButton")

    Dim buttonShape As Microsoft.Office.Interop.Word.InlineShape = _
            Me.Controls.GetInlineShapeForControl(testButton)

    If buttonShape IsNot Nothing Then
        MessageBox.Show("The following properties can be cached in the" & _
            vbCrLf & "document to enable you to recreate the control:" _
            & vbCrLf & vbCrLf & "Range: position " & _
            buttonShape.Range.Start.ToString _
            & " through " & buttonShape.Range.End.ToString _
            & vbCrLf & "Width: " & buttonShape.Width.ToString _
            & vbCrLf & "Height: " & buttonShape.Height.ToString)
    End If
End Sub

private void WordGetInlineShape()
{
    Microsoft.Office.Tools.Word.Controls.Button testButton =
        this.Controls.AddButton(this.Paragraphs[1].Range, 50, 25,
        "testButton");

    Microsoft.Office.Interop.Word.InlineShape buttonShape =
        this.Controls.GetInlineShapeForControl(testButton);

    if (buttonShape != null)
    {
        MessageBox.Show("The following properties can be cached in the" +
            "\n" + "document to enable you to recreate the control:"
            + "\n\n" + "Range: position " + buttonShape.Range.Start.
            ToString() + "through " + buttonShape.Range.End.ToString()
            + "\n" + "Width: " + buttonShape.Width.ToString() + "\n" +
            "Height: " + buttonShape.Height.ToString());
    }
}

أمن NET Framework.

راجع أيضًَا

المرجع

ControlCollection واجهة

ControlCollection الأعضاء

Microsoft.Office.Tools.Word مساحة الاسم