ControlCollection.AddGroupContentControl 方法 (Range, String)
將新的 GroupContentControl 加入至文件中指定的範圍內。
命名空間: Microsoft.Office.Tools.Word
組件: Microsoft.Office.Tools.Word (在 Microsoft.Office.Tools.Word.dll 中)
語法
'宣告
Function AddGroupContentControl ( _
range As Range, _
name As String _
) As GroupContentControl
GroupContentControl AddGroupContentControl(
Range range,
string name
)
參數
- range
型別:Microsoft.Office.Interop.Word.Range
Range ,提供新的控制項繫結。
- name
型別:System.String
新控制項的名稱。
傳回值
型別:Microsoft.Office.Tools.Word.GroupContentControl
加入至文件中的 GroupContentControl。
例外狀況
例外狀況 | 條件 |
---|---|
ArgumentNullException | name 是 nullnull 參考 (即 Visual Basic 中的 Nothing),或長度為 0。 |
ControlNameAlreadyExistsException | ControlCollection 中已有相同名稱的控制項。 |
備註
在執行階段使用這個方法,將新的 GroupContentControl 加入至文件中指定的範圍。如需詳細資訊,請參閱在執行階段將控制項加入至 Office 文件。
範例
下列程式碼範例會在文件開頭加入新段落,並建立包含這個段落的 GroupContentControl。GroupContentControl 可防止使用者編輯段落中的文字。如需使用 GroupContentControl 保護文件部分內容的詳細資訊,請參閱內容控制項。
這是示範文件層級自訂的版本。若要使用這段程式碼,請將它貼到專案的 ThisDocument 類別中,並從 ThisDocument_Startup 方法呼叫 AddGroupControlAtRange 方法。
Dim groupControl2 As Microsoft.Office.Tools.Word.GroupContentControl
Private Sub AddGroupControlAtRange()
Me.Paragraphs(1).Range.InsertParagraphBefore()
Dim range1 As Word.Range = Me.Paragraphs(1).Range
range1.Text = "You cannot edit or change the formatting of text " & _
"in this paragraph, because this paragraph is in a GroupContentControl."
range1.Select()
groupControl2 = Me.Controls.AddGroupContentControl(range1, "groupControl2")
End Sub
private Microsoft.Office.Tools.Word.GroupContentControl groupControl2;
private void AddGroupControlAtRange()
{
this.Paragraphs[1].Range.InsertParagraphBefore();
Word.Range range1 = this.Paragraphs[1].Range;
range1.Text = "You cannot edit or change the formatting of text " +
"in this paragraph, because this paragraph is in a GroupContentControl.";
range1.Select();
groupControl2 = this.Controls.AddGroupContentControl(range1, "groupControl2");
}
以 .NET Framework 4 或 .NET Framework 4.5的這個版本是應用程式層級增益集。若要使用這段程式碼,請將它貼到專案的 ThisAddIn 類別中,並從 ThisAddIn_Startup 方法呼叫 AddGroupControlAtRange 方法。
Dim groupControl2 As Microsoft.Office.Tools.Word.GroupContentControl
Private Sub AddGroupControlAtRange()
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()
Dim range1 As Word.Range = vstoDoc.Paragraphs(1).Range
range1.Text = "You cannot edit or change the formatting of text " & _
"in this paragraph, because this paragraph is in a GroupContentControl."
range1.Select()
groupControl2 = vstoDoc.Controls.AddGroupContentControl(range1, "groupControl2")
End Sub
private Microsoft.Office.Tools.Word.GroupContentControl groupControl2;
private void AddGroupControlAtRange()
{
if (this.Application.ActiveDocument == null)
return;
Document vstoDoc = Globals.Factory.GetVstoObject(this.Application.ActiveDocument);
vstoDoc.Paragraphs[1].Range.InsertParagraphBefore();
Word.Range range1 = vstoDoc.Paragraphs[1].Range;
range1.Text = "You cannot edit or change the formatting of text " +
"in this paragraph, because this paragraph is in a GroupContentControl.";
range1.Select();
groupControl2 = vstoDoc.Controls.AddGroupContentControl(range1, "groupControl2");
}
.NET Framework 安全性
- 完全信任立即呼叫者。這個成員無法供部分信任的程式碼使用。如需詳細資訊,請參閱從部分受信任程式碼使用程式庫。
請參閱
參考
Microsoft.Office.Tools.Word 命名空間