Hello, Hengky,
I updated my project in order to demonstrate how you can track the cell value changes and update the result that is shown in the text box field. Please refer to the following code snippet which result is demonstrated in the attached gif file.
Public Class RadForm1
Dim DataColumn
Private Sub RadForm1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
Me.ProductsTableAdapter.Fill(Me.NwindDataSet.Products)
AddHandler RadGridView1.CellEndEdit, AddressOf radGridView1_CellEndEdit
Dim summaryItem As New GridViewSummaryItem()
summaryItem.Name = "UnitsInStock"
summaryItem.Aggregate = GridAggregateFunction.Sum
Dim summaryRowItem As New GridViewSummaryRowItem()
summaryRowItem.Add(summaryItem)
Me.RadGridView1.SummaryRowsBottom.Add(summaryRowItem)
Me.RadGridView1.MasterView.SummaryRows(0).IsVisible = False
DataColumn = TryCast(Me.RadGridView1.Columns(2), GridViewDataColumn)
Dim value = Me.RadGridView1.MasterView.SummaryRows(0).GetSummary(DataColumn)
Me.RadTextBox1.Text = value
End Sub
Private Sub radGridView1_CellEndEdit(ByVal sender As Object, ByVal e As GridViewCellEventArgs)
Dim value = Me.RadGridView1.MasterView.SummaryRows(0).GetSummary(DataColumn)
Me.RadTextBox1.Text = value
End Sub
End Class
I hope this helps. If you need further assistance please let me know.
Regards,
Nadya
Progress Telerik
Five days of Blazor, Angular, React, and Xamarin experts live-coding on twitch.tv/CodeItLive, special prizes, and more, for FREE?! Register now for DevReach 2.0(20).