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