ErrorAddDataBoundRowEventArgs Класс (2007 System)

Статья
11/16/2008

Обновлен: Ноябрь 2007

Предоставляет сведения для события ErrorAddDataBoundRow.

Пространство имен: Microsoft.Office.Tools.Excel
Сборка: Microsoft.Office.Tools.Excel.v9.0 (в Microsoft.Office.Tools.Excel.v9.0.dll)

Синтаксис

'Декларация
<PermissionSetAttribute(SecurityAction.Demand, Name := "FullTrust")> _
Public NotInheritable Class ErrorAddDataBoundRowEventArgs _
    Inherits EventArgs
'Применение
Dim instance As ErrorAddDataBoundRowEventArgs

[PermissionSetAttribute(SecurityAction.Demand, Name = "FullTrust")]
public sealed class ErrorAddDataBoundRowEventArgs : EventArgs

Заметки

Событие ErrorAddDataBoundRow вызывается элементом управления ListObject, если возникает исключение при попытке добавить новую строку в привязку источника данных в элементе управления ListObject. Свойство Item может использоваться для получения нового пункта, который попытается добавить ListObject. Свойство InnerException предоставляет вызванное исключение; к свойству Retry можно обратиться для указания необходимости другой попытки добавления этой строки.

Примеры

В следующем примере кода создаются объекты DataTable и ListObject, после чего элемент управления ListObject связывается с DataTable. Затем он создает обработчик событий ErrorAddDataBoundRow. Чтобы протестировать событие, необходимо вручную добавить новую строку в элемент управления ListObject и ввести фамилию Chan и имя. Обработчик событий выведет сообщение.

В этом примере демонстрируется настройка уровня документа.

WithEvents ErrorAddDataBoundRowList As _
    Microsoft.Office.Tools.Excel.ListObject
Private Sub ListObject_ErrorAddDataBoundRow()
    ' Create a new DataSet and DataTable.
    Dim ds As New DataSet()
    Dim dt As DataTable = ds.Tables.Add("Customers")
    Dim lastName As New DataColumn("LastName")
    dt.Columns.Add(lastName)
    dt.Columns.Add(New DataColumn("FirstName"))

    Dim myUC As New UniqueConstraint("CustConstraint", _
        lastName)
    dt.Constraints.Add(myUC)

    ' Add a new row to the DataTable.
    Dim dr As DataRow = dt.NewRow()
    dr("LastName") = "Chan"
    dr("FirstName") = "Gareth"
    dt.Rows.Add(dr)

    ' Create a list object.
    ErrorAddDataBoundRowList = _
        Me.Controls.AddListObject(Me.Range("A1"), _
        "ErrorAddDataBoundRowList")

    ' Bind the list object to the DataTable.
    ErrorAddDataBoundRowList.AutoSetDataBoundColumnHeaders = True
    ErrorAddDataBoundRowList.SetDataBinding(ds, "Customers", _
        "LastName", "FirstName")
End Sub


Private Sub List1_ErrorAddDataBoundRow(ByVal sender As Object, _
    ByVal e As Microsoft.Office.Tools.Excel.ErrorAddDataBoundRowEventArgs) _
    Handles ErrorAddDataBoundRowList.ErrorAddDataBoundRow
    MessageBox.Show("Last names must be unique.")

End Sub

private void ListObject_ErrorAddDataBoundRow()
{
    // Create a new DataSet and DataTable.
    DataSet ds = new DataSet();
    DataTable dt = ds.Tables.Add("Customers");
    DataColumn lastName = new DataColumn("LastName");
    dt.Columns.Add(lastName);
    dt.Columns.Add(new DataColumn("FirstName"));

    UniqueConstraint myUC = new UniqueConstraint( "CustConstraint", 
        lastName);
    dt.Constraints.Add(myUC);

    // Add a new row to the DataTable.
    DataRow dr = dt.NewRow();
    dr["LastName"] = "Chan";
    dr["FirstName"] = "Gareth";
    dt.Rows.Add(dr);

    // Create a list object.
    Microsoft.Office.Tools.Excel.ListObject list1 = 
        this.Controls.AddListObject(
        this.Range["A1", missing], "list1");

    // Bind the list object to the DataTable.
    list1.AutoSetDataBoundColumnHeaders = true;
    list1.SetDataBinding(ds, "Customers", "LastName",
        "FirstName");

    // Create the event handler.
    list1.ErrorAddDataBoundRow += new 
        Microsoft.Office.Tools.Excel.
        ErrorAddDataBoundRowEventHandler(list1_ErrorAddDataBoundRow);
}

void list1_ErrorAddDataBoundRow(object sender, 
    Microsoft.Office.Tools.Excel.ErrorAddDataBoundRowEventArgs e)
{
    MessageBox.Show("Last names must be unique.");
}

Иерархия наследования

System.Object
System.EventArgs
Microsoft.Office.Tools.Excel.ErrorAddDataBoundRowEventArgs

Потокобезопасность

Любые открытые члены этого типа, объявленные как static (Shared в Visual Basic), являются потокобезопасными. Потокобезопасность членов экземпляров не гарантируется.

См. также

Ссылки

ErrorAddDataBoundRowEventArgs - члены

Microsoft.Office.Tools.Excel - пространство имен

Поделиться через