Button.Locked Свойство (2007 System)
Обновлен: Ноябрь 2007
Возвращает или задает значение определяющее который Button может быть изменен во время разработки когда лист защищен.
Пространство имен: Microsoft.Office.Tools.Excel.Controls
Сборка: Microsoft.Office.Tools.Excel.v9.0 (в Microsoft.Office.Tools.Excel.v9.0.dll)
Синтаксис
'Декларация
<BrowsableAttribute(False)> _
Public Property Locked As Boolean
'Применение
Dim instance As Button
Dim value As Boolean
value = instance.Locked
instance.Locked = value
[BrowsableAttribute(false)]
public bool Locked { get; set; }
Значение свойства
Тип: System.Boolean
true , если Button не может быть изменен во время разработки, если лист защищен; иначе false.
Заметки
Объект Button может быть заблокирован, только когда лист защищен. Заблокированный объект Button не может быть передвинут или изменен в размерах во время разработки.
Примеры
В следующем примере кода в текущий рабочий лист добавляется два элемента управления Button устанавливается свойство Locked одной из кнопок к true. Затем, в примере рассматривается способ защиты рабочего листа и использования метода ToggleFormsDesign для помещения Microsoft Office Excel в режим разработки. На данном этапе, разблокированную кнопку можно перемещать и изменять в размере, а заблокированную кнопку нельзя перемещать и изменять в размере.
В этом примере демонстрируется настройка уровня документа.
Private Sub TestLockedControl()
Dim LockedButton As Microsoft.Office.Tools.Excel.Controls.Button = _
Me.Controls.AddButton(Me.Range("B2", "C3"), "LockedButton")
LockedButton.Locked = True
LockedButton.Text = "Locked button"
Dim UnlockedButton As Microsoft.Office.Tools.Excel.Controls.Button = _
Me.Controls.AddButton(Me.Range("B6", "C7"), "UnlockedButton")
UnlockedButton.Locked = False
UnlockedButton.Text = "Unlocked button"
Me.Protect()
Globals.ThisWorkbook.ToggleFormsDesign()
End Sub
private void TestLockedControl()
{
Microsoft.Office.Tools.Excel.Controls.Button lockedButton =
this.Controls.AddButton(this.Range["B2", "C3"],
"lockedButton");
lockedButton.Locked = true;
lockedButton.Text = "Locked button";
Microsoft.Office.Tools.Excel.Controls.Button unlockedButton =
this.Controls.AddButton(this.Range["B6", "C7"],
"unlockedButton");
unlockedButton.Locked = false;
unlockedButton.Text = "Unlocked button";
this.Protect(missing, missing, missing, missing, missing,
missing, missing, missing, missing, missing, missing,
missing, missing, missing, missing, missing);
Globals.ThisWorkbook.ToggleFormsDesign();
}
Разрешения
- Полное доверие для непосредственно вызывающего метода. Этот член не может быть использован частично доверенным кодом. Дополнительные сведения см. в разделе Использование библиотек из не вполне надежного кода.