Фильтр на наборе данных очищает все связанные элементы управления

Question

Следующий код работает (строки отфильтровываются по выражению select), но все элементы управления в datarepeater пусты. Когда установлено значение .DefaultView, все записи возвращаются, а все элементы управления имеют свои значения.

 Private Sub CheckBox_FilterApplied_CheckedChanged(ByVal sender As Object, ByVal e As System.EventArgs) Handles CheckBox_FilterApplied.CheckedChanged 
    If CheckBox_FilterApplied.Checked Then 
     ' RichTextBox_Notes.DataBindings.Add("Text", dsTransactions.Tables("TransactionHeader"), "Note") 
     DataRepeater_Transactions.DataSource = dsTransactions.Tables("TransactionHeader").Select("Applied = 0") 

     DataRepeater_Transactions.Refresh() 
    Else 
     DataRepeater_Transactions.DataSource = dsTransactions.Tables("TransactionHeader").DefaultView 

    End If 
End Sub 

Не могу сказать, чего не хватает. Обновление не помогает.

Answer 1

Я думаю, проблема из-за источника данных текстового поля и источника данных DataRepeater.

Я немного изменил код, попробуйте. Работает на меня.

Dim dt As New DataTable 
dt.Columns.Add("Col1") 
dt.Columns.Add("Col2") 
dt.Columns.Add("Col3") 


For index = 1 To 10 
    Dim dr As DataRow = dt.NewRow() 
    dr("Col1") = index.ToString() 
    dr("Col2") = index.ToString() 
    dr("Col3") = index.ToString() 
    dt.Rows.Add(dr) 
Next 

Dim dv As DataView = New DataView(dt, "Col1 >= 8", "", DataViewRowState.CurrentRows) 

TextBox1.DataBindings.Add(New Binding("Text", dv, "Col3")) 
DataRepeater1.DataSource = dv 

Надеется, что это помогает :)

Answer 2

Свойства DefaultView набрано как DataView которого IEnumerable перебирает над DataRowView массивом, который позволяет использовать стандартный синтаксис связывания. Однако метод Select возвращает массив объектов DataRow, которые не могут быть связаны таким же образом. Самое простое решение - обеспечить передачу DataView в собственность DataSource.

If CheckBox_FilterApplied.Checked Then 
    Dim dt As DataTable = dsTransactions.Tables("TransactionHeader") 
    Dim dv As DataView = New DataView(dt, "Applied = 0", "", DataViewRowState.CurrentRows) 
    DataRepeater_Transactions.DataSource = dv 

Else 
    DataRepeater_Transactions.DataSource = dsTransactions.Tables("TransactionHeader") 

End If 

Также обратите внимание, что может связываться непосредственно с DataTable и не нужно явно использовать DefaultView свойство, как он будет использоваться по умолчанию.