I mean, I want to return a value that is based off of 2 calculations and I was wondering if this is correct:
Function CalcParkingFees() As Decimal
Dim dblDays As Double
Dim dcmParkingTotal As Decimal
Dim dblParkingFees As Decimal
dcmParkingTotal = CDec(txtPark.Text)
dblDays = CDbl(txtDays.Text)
dblParkingFees = CDec(dcmParkingTotal * dblDays)
dblParkingFees = CDec(dblDays * dblPARKING_FEES)
Return dblParkingFees
End Function
Thanks!

New Topic/Question
Reply




MultiQuote




|