ewein,
, . - NorthWind. Customers , , .
, , , , , . GroupFooter. datafield "" ( , groupheader). :
- SummaryFunction: - Count
- SummaryGroup: - GroupHeader1 ( , )
- SummaryRunning: -
- SummaryType: - SubTotal
, . , "TextBox1" - , GroupFooter:
Private count As Integer = 0
Public Sub GroupHeader1_Format()
count = 0
End Sub
Public Sub Detail1_Format()
count += 1
End Sub
Public Sub GroupFooter1_Format()
TextBox1.Text = count.ToString()
End Sub
, . ActiveReports blogs, , .