Interfejs ErrorAddDataBoundRowEventArgs
Zawiera informacje o ErrorAddDataBoundRow zdarzenia.
Przestrzeń nazw: Microsoft.Office.Tools.Excel
Zestaw: Microsoft.Office.Tools.Excel (w Microsoft.Office.Tools.Excel.dll)
Składnia
'Deklaracja
<GuidAttribute("eca34a5d-a43c-4be4-a24a-49d49ae4519b")> _
Public Interface ErrorAddDataBoundRowEventArgs
[GuidAttribute("eca34a5d-a43c-4be4-a24a-49d49ae4519b")]
public interface ErrorAddDataBoundRowEventArgs
Typ ErrorAddDataBoundRowEventArgs uwidacznia następujące elementy członkowskie.
Właściwości
Nazwa | Opis | |
---|---|---|
InnerException | Pobiera Exception instancji, która spowodowała wyjątek bieżącego. | |
Item | Pobiera nowy element ListObject podjęto próbę dodania do źródła danych. | |
Retry | Pobiera lub ustawia wartość wskazującą, czy ListObject należy próbować ponownie dodać element. |
Początek
Uwagi
ErrorAddDataBoundRow Zdarzenie jest wywoływane przez ListObject powiązany formant, jeśli wystąpi wyjątek podczas próby, aby dodać nowy wiersz do źródła danych ListObject.Item Właściwości można uzyskać nowy element ListObject próba dodania.InnerException Właściwość stanowi wyjątek, który został zgłoszony i Retry właściwość może być używana do wskazuje, czy należy dodać ten wiersz kolejna próba.
Przykłady
Poniższy kod ilustruje tworzenie DataTable i ListObjecti powiąże ListObject do DataTable.Następnie tworzy ErrorAddDataBoundRow programu obsługi zdarzeń.Aby przetestować zdarzenia, należy ręcznie dodać nowy wiersz do ListObject i wprowadź "Kanał" nazwisko i imię.Obsługa zdarzeń wyświetla komunikat.
W tym przykładzie jest przejmowane poziomie dokumentu.
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"], "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.");
}