asked on
Private m_total As Double
Private m_count As Integer
Public Function CalculateAverage(average As Double, inTotalCostAcre as Boolean) As Double
If Not inTotalCostAcre Then
' Average of TotalCostAcre
Return average
Else If inTotalCostAcre Then
' Subtotal of inTotalCostAcre
m_total = m_total + subtotal
m_count = m_count + 1
Return subtotal
Else
' Average of Subtotal
Dim avg as Double
avg = m_total / m_count
m_count = 0
m_total = 0
Return avg
End If
End Function
SQL Server Reporting Services (SSRS) is a server-based report generation software system from Microsoft. It can prepare and deliver a variety of interactive and printed reports and is administered via a web interface or its web service. Its web services interface also supports the development of custom reporting applications. Finally, SSRS can also be integrated with SharePoint. SSRS competes with other business intelligence tools, most prominently Crystal Reports.
TRUSTED BY