Добавете обща сума във VB.Net Gridview

Не мога да накарам мрежата да покаже общата сума в долен колонтитул

Опитах следното:

<asp:GridView ID="GV" runat="server" 
    DataSourceID="SqlQuery" EmptyDataText="No data">
    <Columns>
        <asp:BoundField DataField="Weekday" FooterText=" " HeaderText="Weekday" />
        <asp:BoundField DataField="Volume" DataFormatString="{0:N0}" 
            FooterText="." HeaderText="Volume" />            
    </Columns>
 </asp:GridView>


Protected Sub GV_rowdatabound(sender As Object, e As GridViewRowEventArgs) Handles GV.RowDataBound
    Dim Volume as integer = 0
    For Each r As GridViewRow In GV.Rows
        If r.RowType = DataControlRowType.DataRow Then
            Volume = Volume + CDec(r.Cells(1).Text)
        End If
    Next
    GV.FooterRow.Cells(1).Text = Math.Round(Volume , 0)
End Sub

Това ми дава съобщения за грешка:

Препратката към обект не е зададена към екземпляр на обект

Следвах съвета на следната страница и промених кода: опитвам се да направя общ gridview в asp

Sub GV_WeekSumary_rowcreated(ByVal sender As Object, ByVal e As GridViewRowEventArgs)
    Dim Volume as integer = 0
    For Each r As GridViewRow In GV.Rows
        If r.RowType = DataControlRowType.DataRow Then
            Volume = Volume + CDec(r.Cells(1).Text)
        End If
    Next

    If e.Row.RowType = DataControlRowType.Footer Then
        e.Row.Cells(1).Text = Math.Round(Volume , 0)
    End If
End Sub

Това не дава грешка, но долният колонтитул не показва никаква стойност.

Пробвах и следното:

Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
    Dim Volume as integer = 0
    For Each r As GridViewRow In GV.Rows
        If r.RowType = DataControlRowType.DataRow Then
            Volume = Volume + CDec(r.Cells(1).Text)
        End If
    Next
    GV.FooterRow.Cells(1).Text = Math.Round(Volume, 0)
    GV.DataBind()
End Sub

Все още няма стойност в долния колонтитул, но когато го отстранявам, виждам, че на долния колонтитул е присвоена стойността, от която се нуждая. Защо не се показва в сайта?

Някаква идея как мога да накарам това да работи?


gridview asp.net vb.net footer
person Selrac    schedule 16.09.2013    source източник

Отговори (1)


arrow_upward
2
arrow_downward

Трябва да използвате събитие DataBound.

Опитайте тази:

Protected Sub GV_DataBound(ByVal sender As Object, ByVal e As System.EventArgs) Handles GV.DataBound
    Dim Volume As Decimal = 0
    For Each r As GridViewRow In GV.Rows
        If r.RowType = DataControlRowType.DataRow Then
            Volume += Convert.ToDecimal(r.Cells(1).Text)
        End If
    Next
    GV.FooterRow.Cells(1).Text = Math.Round(Volume, 0).ToString()
End Sub
person Samiey Mehdi    schedule 16.09.2013
comment
Благодаря ви за отговора. Това беше правописна грешка, която коригирах. Все още не мога да видя данните в уебсайта - person Selrac; 16.09.2013
comment
Да да!! Благодаря ти. Тогава свързан с данни вместо с редове - person Selrac; 16.09.2013