Public Function OranHesapla(ByVal currentValue As Double, ByVal totalValue As Double) As Double
If totalValue =0 Then
Return 0
Else
Return (currentValue -totalValue ) / totalValue
End If
End Function
Public Function OranYuzde(ByVal currentValue As Double, ByVal totalValue As Double) As Double
If currentValue =0 Then
Return 0
Else
Return (totalValue / currentValue)*100
End If
End Function
rdl Code örneği
=Code.OranYuzde(SUM(Fields!GYT_SATIS.Value),SUM(Fields!BK_SATIS.Value))
Hiç yorum yok:
Yorum Gönder