Ready to improve network connectivity? Watch this webinar to learn how SD-WANs and a one-click instant connect tool can boost provisions, deployment, and management of your cloud connection.
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
Add your voice to the tech community where 5M+ people just like you are talking about what matters.
Join the community of 500,000 technology professionals and ask your questions.